(C) 1983 Bimestriel re EE —— LE NUMERO 20 F 





HoËë 


JUILLET 


PROGRAMMES 4 


p3: P. Brikké: KA et DEV(iner) . p4 François Laux: Décodage de x; Daniel 
Georgelin : HP en société . ps François Laux : Décimal-hexa, décimal-binaire. 
p6 Jean Boschat : Tone x ; J.F. Pelanne : Intégration (Simpson) . p7 Georgelin 
Daniel : Entrée alpha numérique ; Jean Fèvre : Vécimal vers programme, Îles 
fichiers du X-F, pendu X-F. 


) APPLICATIONS 4 


41C 


pl0 Jean Boschat : les assignements, .END.; J-D Dodin : remarques sur l'inter- 
face vidéo . pll Serge Vaudenay : Aléa; Jean Furgerot : Tips and routines, 
méthodologie, le coin des U-PRO . pl3 Robert Schwartz : W", Lb1l délocalisés et 
BG . p 14 J.F. Pelanne : exécuter un programme en X-F . pl5 Patrice Nolin 
ST0 12 . Didier Cayrac : nouvelle 41C? ; Jean-Claude Caty : les plantages, le 
livre d'astronomie de Bouîiges, les labels . pl7 Daniel Georgelin : programma- 
thèque ; J. Pividal : ASC . 


15C 
pl8 J-D Dodin/Bruno Piquet : suite du feuilleton-résumé des épisodes précédents 
Microcode 

p2l Bruno Causse : les deux premiers bits . J-D Dodin : programmer en microcode 
pourquoi pas ? . p22 Serge Vaudenay : listings ; Jean-Claude Bornes : MLDL 
p23 CCD ROM PROJECT . p24 J-D Dodin : MLDL, mise en route . p25 J-D Dodin 
Standard, différence entre MLDL et protocoder, Te MLDL Operating System 
Patrice Nolin : émulateur du CPU sur la 4IC : p27 Marc Chiffoleau : assembleur 
à partir des mnémoniques . 


700 


p28 Janick Taillandier : Forth, Benchmark, Integrate . p29 Eric Angelini 
réflexions . p30 Janick Taillandier : langage machine sur 75. 


) RUBRIQUES «4 


à partir de la page 2 


BONNES VACANCES 


PPC-T Edité par PPC 
77, rue Cagire - 31100 TOULOUSE 


Petites annonces 
1187 Brikké Philippe 3 chemin d'Eulmont 54690 Lay-St-Christophe, 
tel (8) 326 88 14 urgent vends interface vidéo 82163B: 1000F 
(réception sur moniteur ou télé multistandard VHF CCIR). Module 
HP-IL  400F, le tout de 1982. 


1139 Vincent Herclicq 3 rue Berteaux Dumas 92200 Neuilly/seine 
vends HP 41C 1300 F + Imodule RAM. Vends X-F, X-M, time, 350 
F à débattre, 


T1 J.BOSCHET,4 rue Descartes, 
560 GRANDR=STNTIHE, 
RÉCHERCHE(URGENT9 : 

-5F de Wickes à moins de IiGCrh# 

-IMF EF&°I43A à moins de I:CCFY 

HF 4IC Syste: Jic.à moins de 100FF 
-Lect.de CB à moins de 600FF 

Faire offres... 


Les systèmes HP-IL s'agrandissent: aprés le multimêtre électroni- 
que et le capteur de données ("data logger"), voici un analyseur 
logique de table, juqua 43 canaux...0n annonce aussi un fréquence 
mêtre et un analyseur de signature... 

Quelques chiffres sur Hewlett-Packard en 82: 382 millions 
de $ de bénéfices nets, réinvestis à 90%. croissance mondiale 
19%, l'informatique fait 52% du chiffre d'affaire du groupe. 
La France absorbe 12% des commandes. H-P consacre 10% de son 
chiffre d'affaire en recherche et développement et 8% à l'auto- 
financement. L'effectif du personnel augmente de 15% par 
an. cette augmentation est de 16% par an en France. Grace 
à l'établissement de grenoble H-P est un des plus gros 
exportateurs de matériel informatique français (a vrai dire 
ils ne sont pas trés nombreux) en exportant 1/3 de son chiffre 
d'affaire. 

70% du chiffre d'affaire de la société est réalisé sur des 
produits vieux de moins de 5 ans. 

Un nouveau siège social de H-P France doit s'ouvrir incessamment 
à Evry, sur 11 000 m2. 


Sur Île Marché 


Le CETIM (52 av Félix Louat 60300 SENLIS) diffuse gratuitement 
un logiciel pour HP 41C+Quad ou CV sur les règles de calcul 
du CODAP (appareils à pression): dossier comprenant listing, 
notice et jeu d'essai. Copie possible sur cartes ou bandes 
sur place. Demander Mr F. Osweiller. 


Mountain computer vient de mettre sur le marché un interface 
vidéo 80 colonnes HP-IL (NTSC ou PAL) pour 300$ (adresse dans 
le N°5). 

CompStop vends un MLDL II (fonctionnement analogue au protocoder) 
vendu avec 8K de RAM + 8K de RAM optionnelle. Pas de ROM. 
300$. 

CompStop 3853 N. Oracle Rd. Tucson, Arizona 85705 tel (602) 
888-1532. 


EDITORIAL 


Un numéro trés chargé, cette fois-ci. Du coup, peu de place 
pour le courrier. Ce numéro sera pratiquement terminé avant 
l'assemblée générale et je ne pourrai donc y faire écho qu'en 
cas d'évênement exeptionnel. 

Un point sur lequel j'aimerai avoir votre avis est la future 
formule du journal. La cotisation qui passe à 100 F au premier 
juillet devrait dans notre esprit rester assez longtemps à 
ce prix. Vous savez que l'augmentation est due pour l'essentiel 
à l'augmentation du nombre de pages du journal (dont le prix, 
par voie de conséquence, passe à 20 F avec le présent numéro). 
Mais tout dépend de l'exigence de qualité qui est la notre. 
J'ai devant moi un devis d'un imprimeur "sérieux" qui peut 
nous sortir le journal au format PPCJ, c'est à dire sous forme 
de cahier "piqué à cheval" c'est à dire avec deux agraphes 
au milieu d'une feuille double format repliée, comme un magazine. 
Pour 500 exemplaires (notre tirage actuel, pour 330 adhérents 
et 50 ex vendus à la Règle à Calcul) la facture est de 3298 F 
Hors taxes, bien sûr. soit 3911, pratiquement 4000 F TTC, 
soit 7,82 par numéro Compte tenu des frais annexes , Île 
journal reviendrait environ à 10 F. Les frais de port se montent 
probablement à 6,30 avec le nouveau tarif si on dépasse 100 
grammes, soit un total d'environ 17 F de prix de revient. 

Ceci nous amênerai à un prix de revient de la cotisation au 
moins de 150 F, compte tenu des circulaires intermédiaires. 

Si nous voulons donner dans le luxe (comme les anglais avec 
Datafile) et une couverture "magazine", 31 faut compter sur 
une cotisation à 180 F avec un journal à 30F. 

L'idiot, dans l'affaire, c'est que les 500 exemplaires suivants 
coûtent 4 fois moins cher! Si nous tirons à 1000 (mais encore 
faut-il les vendre!) il ne serait pas nécessaire d'augmenter 
la cotisation. Le problème est que si nous dépassons Îles 500 
adhérents, la gestion deviendra impossible à Îa main , et 
même avec la 41 (je n'ai pas encore eu le temps de faire Îles 
programmes); et il faudra s'équiper... 


bE  . 


OURNAU X 


PPC-J: dernier numéro reçu Avril 83 (VIO K3) avec quelques 
nouvelles de nos amis australliens, heureusement car . 
PPCIN: rien depuis Île numéro 13 
Datafile: un beau numéro (V2N2) triple 
une couverture sur le FORTH, une mise en page particulièrement 


(MAR/APR/MAY) avec 


belle avec une grande variété de titres fait soit au normographe 
soit à l'imprimante avec un programme de "Banner".(mes programmes 
de ce genre sortent des caractères trop gros).La mise en page 
est aërée avec beaucoup de pages écrites sur une seule colonne 
(toujours avec réduction, mais sur toute la largeur. 

Prisma: reçu le numéro 4 Avril/mai 83, toujours aussi beau. 


NOP NOP NOP 


POUGEON Olivier (T1 62) 


à 
J.D. DODIN (7226 T 1) 


Rennes, le 16/04/83 
Cher Mr Dodin, 


ERRATUM, à ma lettre du 12.04 concernant le programme ORP. 

En utilisant aujourd'hui, je m'aperçois que la version 
de ORP que je vous ai fournie (cartes, listing et commentaires) 
n'est pas celle qui fonctionne. 

J'ai en effet envoyé et commenté une des premiêres versions 
(ça m'apprendra à libeller correctement mes cartes) qui était 
incomplète et ne fonctionne donc pas. 

La partie à modifier se situe entre Île IBL 10 et Île pas 
numéroté 50, le listing rectifié est le suivant : 


fleLEL 18 15 GTO 11 
8£ 4 166LEL 12 
G3e+LBL 11 17 156 68 
A4 SF 25 18 GTO 18 
95 “LST” 19 “LST” 
86 SEEKPTA 28 PURFL 
A7 FC? 25 21 REL 81 
fe GTO iè 22 STOFLAG 
83 GETREC 23 “FINI” 
14 5F 25 24 AYIEW 
11 KEQ INI 44 25 RTH 

12 AVIEN 26+LEL 81 
131 2 SAYEP 
14 + 28 RTK 


KX* + X 


Xx Aeacrions 


Un mot pour vous dire ce que je pense du journal (ça sert 
d'avoir "l'avis de la base" comme dirait l'autre). Remarque 
que cette lettre est manuscrite car: c'est du bla-bla,"le 
ruban de ma machine n'est pas neuf" et j'ai la flemme de taper 
une lettre avec 2 doigts. 

Tout d'abord j'ai bien aimé "Au Fond", je ne dirais pas que 
c'est clair (je mentirai) mais c'est en français (Cocoricoi) 
et ça m'a permis de bien comprendre la programmation synthétique; 
pour l'instant je nage dans le microde. J'aurais une remarque 
à faire à propos du nouveau programme KA paru dans Île n°5: 
certes il gagne 35 bytes par rapport au tien (je pense que 
c'est le tien) mais je n'aime pas du tout la façon de rentrer 
les donné es: code de la touche, préfixe, postfixe car pour 
moi c'est anti-naturel: je pense d'abord à la fonction puis 
je réfléchis au code la touche où je l'assigne. Certes il 
est simple d'insérer XC>37Z XY dans Île programme pour permettre 
la rentrée "classique des données mais il y a plus grave/ 
lorsqu'on se "goure" pour rentrer ces codes ce nouveau programme 
fait planter la machine (+PACKING infini en général). ON s'en 
tire avec un Memory Lost mais quand même! L'ancien par crrtre 
m'assigne en général XROM 07,52 (-ABS) aux touches déjà assi- 
gnées: c'est moins grave. 

Passons au journal proprement dit: c'est fameux et je ne regrette 
ni mon inscription ni les anciens numéros que j'ai commandés. 
J'aime les articles de "bla-bla" sur la programmation synthé- 
tique: ils sont en général bien écrits, avec humour ce qui 
ne gâte rien (humour "HP" diront certains). Par contre Ta 
composition du journal est assez particulière: une chatte 
n'y retrouverait pas ses petits...Bref c'est assez bord... 
Je vais être obligé, je pense, à prendre des feutres de couleur 
différente pour annoter les bulletins : rouge pour Île programma- 
tion synthétique “haut-vol", orange pour la normale,bleu 
pour les programmes de maths, vert pour ceux de jeux etc...Bref 
l'intérêt du lecteur se disperse, se dilue dans ce dédalle 
d'articles. C'est pour cela aue les articles que j'apprécie 
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PROGRAMMES 4 


P, BRIKKE (T1£7) 
16,A1lée du “ié 
5442C Faulxiures °es Nancy 
Cher 
Pourriez 

car mon exemplaire de 


vean-Daniel Zoiin , 
-vous m'envoyer 1 
"Au Fron 


+ ds, 
vo :re 4Alvre 


AN ç set 
e 50 de 


la P-41["a eu es 


a 
ie 
precblèmes Je tirage ? cette page;Xerci <'avance. 
loici ©? programmes ( Avec le Z-7unctions ) 
- KA : le classique prgm 
pour effestier toutes les assignations , revu et 


amélioré . 

-DEV : il faut deviner » 
mot avec le mins de coups possible . { Beaucoup 
pius performant que le"word guessirg game" de ‘IP ) 





K A 

01 LET "KA 41 STO c ou 125) 
02 L3: 00 49 MALTIIE® O:OUI" 
03 CF oc 43 AVIEN 
04 CF 05 44 LBL C2 
OS "EX 1 9m 45 2EÈTKE 
PE ANT 46 X=07 
C7 XEQ 01 47 GTO 02 
O8 STO 04 48 42 
0G "PRETPOST 1 9" 49 X=Y? 
+0 PROMPT 50 STO 00 
‘1 TO 05 C1 CLST 
12 RDN 52 CLA 
13 STO 06 53 CLD 
14 "KEY 2 9" C4 RTN 
15 AVIEW 55 LAL 01 
16 XEQ 01 56 GETKEY 
17 STO 01 57 X=0? 
18 "PRETPOST 2 9" 58 GTO C1 
10 FROMPT 99 31 
20 STC 02 60 X=Y? 
21 RDN 61 GT2 03 
22 STO 03 62 RDN 
22 6 63 F2? CO 
24 ©TC 00 64 CHS 
25 “g" (241,240) 65 "+" 
26 L3L O4 635 PASN 
27 RCL IND O0 67 A3S 
28 XTOA 68 42 
29 DSE 00 69 X=2Y? 
3C TO 04 70 5F 05 
31 RIL M (144,117) 71 CLx 
32 RCL c (144,125) 72 43 
33 XC>Y 73 X=Y? 
34 "XR BB" (245,1,105,0, 74 SF 05 

240,240) 75 CEx 
35 AFTO ce (154,12) 76 44 
36 177 77 X=1? 
37 XCY 78 EF 05 
38 STO IND Y 7S RDN 
2a nf 80 STO Y 
40 RT 81 El 

= — — 4, 
82 / 96 + 
83 INT 97 , 
84 XOY 98 X4L>Y 
55 Et 99 FS?C 05 
86 MOD 100 16 
BTE 101 + 
88 - 102 RTN 
8SG 16 103 LI: 03 
A0 * 104 FC?C CO 
91 + 105 SF 00 
22 , 106 GTO C1 
93 KC>Y 107 END 
94 F2?5 :0 
95 8 
vtilisaticon: 

Clavier A 


< ‘ichage 
KE VKAN KEY 1 ? 
Appuyer sur la première 


touche que vous voulez 


assigner . TENTIGET = 
ïréfixe {décimal } 

ENTERT 

Fostfixe (décimai ) 

R7E KEY © 7 

Appuyer sur la [eme 

toache hdassisner. FREE 2 7 
Fréfixe (äécimai ) 

ENTER? 

Tostrix: (Jécimal) 

a/7 AUTRES? O:OCTI 
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calcul comme en mode RUN. 
(voir ailleurs dans ce numéro). 


* 


DL QUI Touene © (CIRE) NEt 1 etes 

Zi NON N'importe quel 

autre toiche . 

emarques 

- Les assignaticus se font par raire 
Aniqiemert . 

= Four JL de EL A 15 ei TO DL À 2e) re 
il faut les assigner sur L oetets et 
noi ül seul . I1 faut Jjecic es assiguer 
come es nUL 1€ ? 59 vu DTC 16 à 9. 


- Les initruüctiurs courantes 


réfixe [ss'rixe “inction 
4 C CAT 
4 2 = - 
4 3 Or 
+ 4 Se 
4 5 Re 
4 € SILE 
4 7 35 
4 È EST 
4 1C FAC 
4 19 ASN 
+ 13 
; 21 X | Q loaders 
4 à D 
4 27 Fournie des E 
4 29 CTO " ( &-load ) 
4 32 XEQ " ( 2-load ) 
4 167 eGOBEEP_ 
- 0: peut facilement introduire une partie 


de ce progamme dans un autre afin de tout 
pouvoir assigner par programme : 
1* introduire la séquence : 
code touche À assigner (1) 


tan 
PASN 
code touche à assigner (2) 
LL 
TASN 
:* Placer en Alpha : 


Î t—— [cde Cp touche 2 
Fostfixe 2 
Prérixe 2 


Code £p touche 1 
Postfixe 1 
Fréfixe : 
Text O : Tode 240 
* irifouuire daus le prgm la séquence 
Ligne 31 jusqu'à la ligne 41 comprise . 

- Le code ZCpécial est obtenu à partir du code 

normal : 


Jode normal = T(#,-) X(ligne) Y{colonne) 
“uit A= 1 si [= 

ñ= C si = 
et 3= si code norm = +42 ; +43 ; +44 


Z= © dans les autres cas 
Code Spécial= X 1(( Y-1+B+(A/2) }* 16) 


En fait la pluspart des instructions à un octets 


STO ou RCL peuvent s'assigner directement avec comme préfixe 
l'affichage est farfelu mais 


la fonction marche en mode 
Il y a cependant au moins une exception 


ss. D £ V css 
51 L3L DEV 21 GTO 10 
ü2 LBL 10 32 Li 
03 ©F 26 25 a 
C4 ur" Rae. 
S.à er 
GG CRFTA 36 35 
OT CF ÿ0 37 àTIA 
GE de Er 3£ DSE C2 
cg he 39 GTC 0y 
1- RS ne 4C AÏT REC 
1 10% . 41 LBL 1e 
2 BQUEL YO Fi 42 E 
13 TONE 9 (15:, 894: f3 SERRE 
t4 TONE : (159,32) A 
1® TCNE 2 (1 ere 
 . ce 2 46 TONE 3 (159,89 ) 
17 sror 47 TONE 2 (159,32 ) 
te ASP 48 TÔNE 9 (159,89) 
19 ALENG 4S TONE 2 (159,32) 
SE or ot 50 LEZ C8 
51 TO C2 51 LBL 00 
MS MA À 5Z GETKEY 
22 STO C3 EU 
25 13 53 STO Y 

54 m4 
24 X/="? 77 
28 eo 10 55 / 
“ AÉY Do ST Ur EXD à 

27 LBL OS + 


22 GS na fS 
gt Lx YA 
ég à ‘42 ==. 4; 
63 GIC 1) FD OMETE NE ET 
Lo + J 1 j ‘é AVIUN 
ES: 34 141 TON © (16%, 70) 
00 4=YT 197 PENSE 7 C0, 6T) 
67 UTC 0€ 155 ICNE © À ” : 36) 
68 [LI 18 POS Fin SAT 
69 3° né No (47,961 
IC Xaey? 126 INCTHR 
Fi XeC SC 27 CL 
Fe va 128 E 
13 45 229 DELTHR 
T4 STÛ 13 130 + 
ré ESL 04 121 CEEKPT 
T6 44 1525 Y492 
TT X=Y? 153. CLA 
78 GTC ©C ‘14 YTOA 
19 CLX 135 INCCHR 
8C 37 126 E 
81 STO 12 se DTSCrS 
> has D 
83 2€ 120 TO 12 
84 GIO 13 14C E 
85 LBL C6 141 SEEKPT 
E6 24 142 [TTREC 
87 GTC 13 143 AYIEY 
88 Z3L C7 144 TONE 2 (73) 
83 73 145 TONE © (72) 
9C 217 146 TONE 7 (87) 
St GTO C9 147 TONE 3 (73) 
Y2 CLX 148 TONE © (72) 
325 14 149 TONE 7 (87) 
34 X=Y7 150 TONE 2 (73) 
95 GTO OC 151 ROLL 01 
56 ŒLX 152 RCL C0 
G7 18 152 / 
G8 LBL 1: 154 E2 
5 + 132 * 
100 CLA 156 CF 29 
OÙ XTCA 157 FIX O 
192 I53 CO 158 CLA 
105. CET 158 ART 
104 , 160 FIX 2 
ÉD. CARE 161 ©F 29 
1C6 POST 162 “p Ÿ DE SON" 
197 RL 162 AVIEY 
10€ INT 164 TONE © (SH) 
109 X=07 165 TONE 7 (57) 
110 STO 11 166 TONE O (RO) 
119 "NON # 167 TONE 7 (5+) 
112 AVIE" 168 "MT" 
113 TOME 8 (159,38 ) ‘69 DPURF:, 
114 TONE 7 ( " ,37) 170 CL 
115 TONE 8 ( " ,38) 171 CLCT 
116 TONE 7 ( “ ,37Z) 172 crop 
117 GTO 12 173 STO 10 
174 END 


Utilisation: 
XEQ"DEV" ; Entrer un mot puis R/S (4& A2 lettres) 


Appuyer sur une lettre ; Surprise! 


Tour un nouveau jeu aprés la fin : R/© 

Ce jeu enthousiasme mon entourage , surtout en 
vitesse rapide .( Sur ma 41CV , ? vitecses 
‘)\Normale ?) Rapide 2 X plus !'!! c'est super ! ) 


Mo x 5 NM ON # 
Monsieur François LAUX 
Chemin des Fontaines 
FEROLLES 
77580 CRECY la CHAPELLE 


Voici un petit programme long de 8 registres 
inspiré des fiches pratiques de l'Ordinateur 
Individuel n° 30, I1 s'agit de DX (Décodage de X), 
11 retourne les valeurs décimales des 7 octets 
Contenus dans le registre X, Seule la pile est uti- 
lisée,Alpha est perdu, X est conservé en X et LASTX, 
Mais passons à un exemple en décodant le registre c. 
+ Faire SIZE O26 
” CLE 
+ RCL c en mode programme où en pressant la touche 

prévue à cet effet en mode USER, 
Voir & TZ BWasur une CV où une C avec QUAD-MEMORY , 
= XEQ"DX" 
Affichage de: 31, 16, 1, 105, 30, 97, 221, 
Si l'affichage défile trop vite, armez le FLAG 21 
PPC-T 
JUILLET AOÛT 


et faire R/S entre chaque arrêt de la calculatrice, 
Comment interpréter ces nombres? C'est simple, Tout 
d'abord il faut les traduire en hexadécimal sur 2 
chiffres. Donc 31 16 1 105 30 97 221 
1F 10 01 69 1E 61 DD 
Rappel de la structure du registre €: en partant de 
la droite on az 
Digits O0-1=2 = adresse du ,END, permanent, 
Digits 3-4«5 = adresse du 1er registre de 
données R gg. 
Digits 6-7-8 « constante de départ à chaud 
de la HP, 
Digits 9-10 = brouillon. 
Digits 11-12-13 « adresse du 1er registre 
statistique,. 


Découpons maintenant par tranche les 7 nombres HEXA, 
1F 10 à _ GS JE 61 Do 
He@exa =  1F1 O0 169 1E6 1DD 
Déc. = 497 /{ Constante 486 477 
ou 497 = REG 
486 = Rp 
477 = END, 
Ce Q. Fe D, ! 
Soustrayez donc pour voir 486 de 497 = 11 = adresse 


du 1er registre statistique comme indiqué dans le 
manuel d'utilisation page 75, 

Autre exemple: le registre d qui contient les 56 
FLAGS (O0 à 55) 

Un registre est découpé en 7 octets eux-mêmes divisés. 
en 2 digits qui font 4 bits chacun, Bonc 4x2x7 = 56 
Le compte est bon 

Armons le FLAG 2 (SF O2) 

RCL d 

XEQ "“DX" 

Sur ma HP j'ai: 32,06,52,49128,1 

32 en binaire = 100000 soit un nombre composé de 

6 chiffres. 11 manque 2 chiffres (1 octeteSbits) 

Donc on rajoute 2 @éros devant 100000 = 00100000 

et nous avons le code binaire du 7ème octet composé 
des 8 premiers drapeaux (O à 7) et en partant de 

la gauche en commençant par © on a bien le FLAG 2 
levé. 

Faites SF O5 et SF O7 

RCL'd et XEQ"DX" = 37,0,6 etc …... 

37 décimal = 100101 + 2 zéros = 00100101 et vous 

avez l'état des 8 premiers drapeaux, Je vous laisse 
le soin de déchiffrer la suite.... Par curiosité 

avec SF 02 SF 05 SF 07 avec O en X faites X F = 
164.8t que font 164 en binaire? Je vous le donne 
Emile! = 10100100 soit l'état des 8 premiers deapeaux 
mais à l'envers! Une cyriosité mathémat ique sur les 
puissances ou l'on a 2* + 2° +4 2? … 164, 


J'espère que ces quelques explications auront 
levé un peu le voile obscur qui recouvre la pro- 
grammation synthétique pour les nonsinitiés 


..e 
Amusez-vous bien ! 
T 207 
12:24PM 65/38 16+LEL 81 

AleLEL “Lx” 17 VIEN X 
42 CLE 18 DSE Z 
83 ADY 19 DSE Ÿ 
A4 STC I 28 GTG 4 
A5 A èl Xér 2 
#6 STE L 2e GTD 43 
A7 & 
@8 ERTEF+ 23eLBL 42 
AG GTû 47 24 ATOX 

25 VIEN X 
14+LEL 44 26 X{) 2 
11 ALEHG 
12 K=Y7 2reLEL 43 
13 GTO &2 28 ISE X 
14 ST- 7 29 GTO 48 
15 CLÉ 34 LASTE 

31 CLE 

32 .FHI. 


ROUEN ON 
H.P. en societe 


proposés pour notre 
unique personne. À 


La plupart ües programmes de jeu 
H.P. 41 C se jouent à une seule et 
croire que les utilisateurs de ces machines sont de vieux 
ermites craignant la compagnie. Ou encore que seuls, eux, 
possèdent l'art et la science de les manoeuvrer. Mais peut 
être est-ce les autres qui hésitent à pénétrer un univers 
qui leur semble compliqué et sans intérêt " Qu'est ce 


NHo6’ 


1987 pa 


pal expellelte, Je pUiE Vous affirmer qu'un progamme ue 
jeu de règle Simple ou connue, d'utilisation aisée, le 
tout appuyé d'une seule personne intérèssée...et c'est la 
ruée ! Voici donc, pour égayer vos soirées en société, un 
premier programme, de jeu bien sur, qui éveille beaucoup 
l'intérêt et l'esprit de compétition, qui est compris tre: 
vite, mais qui est peut être un peu compliqué d'utilisation 
( toutes suggestions à ce sujet seront les bienvenues ) 

La règle en est simple on peut l'expliquer en quelques 
mots mot, mélange des lettres, déplacement des lettres 
bons ou mauvais. Détaillons quand même un peu : un des 
partis donne un mot secret à H.P. ( moins de douze lettres 
) qui vicieusement en mélange les lettres. Puis elle les 
restitue à l'autre parti qui, pour retrouver le mot, peut 
alors tenter des déplacements de lettres dont H.P. affiche 
le caractère bon où mauvais. Elle compte tous les coups 
J'essais et :n livre le nombre une fois le mot reconstitu 
à l'affichage. 

Mais parlons un peu du programme il est long ( 448 oc- 
-tets soit 4 pistes de £ cartes magnétiques ) mais relati- 
-Vement simple à comprendre car il ne possède pas d'astuces 
super-géniales. Il n'utilise pas de sous-prosrammes exter- 
-nes et nécessite 19 regitres mémoires. Voici l'explication 
de ses labels RLM comme Retrouver Le Mot, Vk comme Vékhi- 
-fication des données entrées, “RR comme ERReur, K£EC comme 
RFConstitution et enfin FIN comme FIN ( qui l'eut cru }) . 

Donc pour rentrer ce jeu en machine il vaut mieux possé- 
-der le lecteur de cartes magnétiques. Mais attention pour 
ÿ jouer, il vaut mieux l'enlever. J'ai en effet remarqué 
que cet accessoire intriguait beaucoup les incultes, et 
qu'ils finissaient toujours par trouver le moyen de l'ôter 
( la machine toujours allumée bien sur ) . Ensuite c'est 
relativement simple, faite XEQ'RLM ( ou RTN si vous ve- 
-nez d'y jouer ) , H.P. vous demande le "MOT SECRET: ?", 
elle est déjà en mode alphanumérique, vous n'avez qu'à 
introduire ce mot mystèrieux et à relancer R/S. Donnez 
alors la machine à vos adversaires. Elle les fait patienter 
et finit par afficher, sous leur regard perplexe, les let- 
-tres mélangées du mot. Ici trois cas se présentent: 

s'ils se demandent, par exemple, si le S qui la 2° Jet- 
-tre du mot mélangé ne serait pas la dernière et /° lettre 
du mot à retrouver ? 

- ils peuvent alors faire R/S, H.P. demande "DE 0-7?" 
ils introduisent alors l'ordre ( la position ) de la lettre 
qu'ils veulent déplacer, ici 2, et ils relancent. 

- mais ils peuvent aussi donner directement cette valeur 
et relancer. 

- ou alors ils introduisent une valeur inadéquate et re- 
-lancent, 

Dans ce dernier cas la machine leur rappelle le nombre 
de lettres du mot et l'affiche à nouveau. Sinon elle leur 
demande MA 0=??", Ce à quoi ils doivent répondre par l'or- 
-dre ( la position ) supposé de la lettre choisie précéde- 
-ment. Mais là encore si cet ordre est inadapté elle leur 
rappelle le nombre de lettres du mot et l'affiche à nou- 
-veau il faut alors recommencer. Sinon elle réfléchit 
et finit par annoncer "C EST BIEN" ou "C EST MAL", Li 
c'est bien c'est que la première lettre choisie dans le 
rot mélangé ( ici 5 ) est bien dans la position donnée en 
seconde ( 7 ) . Le S serait donc bien la dernière lettre, 
ut si c'est mal c'est que cette lettre serait mal placée, 
le S ne serait donc pas la /° lettre du mot mystérieux, 
Attention on ne peut rien dire d'autre et si vous avez 
deux S dans le mot la machine ne fera pas de distinction 
entre l'un et l'autre, 

H.P. effectue alors l'échange entre les deux lettres d‘- 
-Signées par leur position et 

- Soit réaffiche le mot ainsi trituré 

- Soit, si celui-ci est le mystère, et a donc été déccu- 
-vert, annonce le nombre ue coups d'essais qu'ils leur : 
‘allu pour le :erçer, 

Un dernier conseil avant de vous livrer le programme 
#xpliquez bien à vos amis l'utilisation de la touche R/£ 
car ils oublient souvent de relancer, alors que l'intro- 
-duction des données leur est facile. On pourrait bien 
supprimer cet ennui par une boucle centrée sur une pause, 
mais le temps de réponse est alors long et il5 ne compren- 
-nent pas pourquoi la machine met tant de temps a répondre, 

Et pour finir voici le commentaire ligne par liyne : 


LiN Duniel 


k , 52 


145 *HETEN" 





HielE, ‘61 14 i 
62 “MAT SELFET a4 + 146 KeŸ° 
A3 Ah 55 * 147 “+MAL* 
h4 STI sé 6 148 AVIER 
AS AU£+ STE 1A9 TOHE © 
fé STE me 58 [HT 114 ISG 42 
A Hirf 54 REL IE 111 CLA 
85 ASTD K1 64 X{5 IHE C 112 GTÜ 44 
A9 SF 25 61 STE HD * 
18 “ATTERDEZ”" 62 RC 1136L6L “VF” 
11 AFIEW 63 156 # {14 IHT 
13 SF 4û 64 GTE 42 115 AES 
53. 116 X=E? 
86 STi 42 117 GTO “ERP: 
118 RC 45 
bT#LEL 44 1191 
ÊS KES "REC 138 + 
1FeLEL 46 69 REL 44 121 KCY? 
{8 KES *{:” ?8 ASTO Ÿ 122 GTO *ERF* 
19 ASTO IH &: 71 $eY? 123 RON 
24 IS 42 F2 GTû 45 124 RTH 
21 156 43 F3 ASH 
22 GTO 68 F4 RE &1 125+LBL °ERF' 
73 ASTO Ÿ 126 “IL K À QUE" 
234LEi Bi F6 A=Ÿ7 127 AVIEH 
24 RCL &4 êt GTÜ “FIR" 128 TONE 7 
25 SF 25 129 FIX 4 
26 AES F8eLBL A5 134 CLA 
èr FS?C 25 29 CLST 131 RCE 45 
28 GTO 42 88 CF 22 132 1 
29 “N=?* 81 “DE 0=7?* 133 + 
38 PROMPT 82 BEEF 134 ARCL # 
83 STOF 135 *+ LETTRES" 
31eLEL 62 84 FC? 28 136 AYIEH 
32 STO A4 85 PROMPT 127 TONE 9 
33 RCL 63 86 XEG “VE” 138 TOHE 5 
34 INT 87 *A 0-2?" 139 GTÜ 44 
35 % 88 PROMPT 
36 - 89 “EH BIEN: 14feLBL “REC” 
3e STG 45 98 AYIEK 141 RCL @5 
38 6 31 XE8 “YR- 142 6 
39 + 92 STÙ 43 143 + 
48 j E7 93 5 i44 1 E7 
41 - 94 ST+ 7 145 
426 59 + 146 6 
43 + 96 RCL IND * {47 + 
97 X<> [HD Z 148 CLA 
44eiEl 4: 98 STG IH * 
45 RÈL 44 99 ENTER+ 149eiEi A6 
46 EE 148 ENTEP+ 158 ARCL INR ‘: 
47 * I4i XEG IS" 151 AYIEN 
48 ,:11357 {42 RCL 7 158 156 x 
49 + 143 "C EST * 153 GTO À 
o8 FRC 144 x=77 154 RTH 
51 STE Ré 
Je RCL 45 1596LEL “IS 


156 CLR 


EE EE 


Monsieur François LAUX 
Chemin des Fontaines 
FEROLLES 

77580 CRECY la CHAPELLE 


Cher Jean Daniel, 


ES. E 
dé b 


156 RL 4: 
139 INT 
164 &:T° 
18 - 
ié2 AE: 
163 ? 

164 x: 
165 - 


1666LEL 47 
167 “+ " 
168 DSE x 
169 GTO 47 
178 Rt 

17156 

172 RCL 43 
173 INT 
174 Ké=#7 
175 GTO A5 
176 ASTG # 
177 AREL 4! 
178 ASTO T 
179 x=Y? 
188 GTO 4 
181 GTO 4S 


182LEL 4£ 
183 ARCL 48 


184+LBL 43 
185 ASHF 
186 ASTE 7 
187 * : 
188 ARCL x 
189 ASTO & 
198 CLA 
191 ASTO Ÿ 
192 * * 
193 ARCL # 
194 ASHF 
195 ASTO # 
196 x=Y? 
197 GTO 81 
198 RTH 


199+LBL “FIH' 
288 “GAGKNE" 
281 AYIEX 
282 BEEP 
283 "EN ” 
244 FIX # 
285 ARCL 4° 
246 “+ FOIS- 
287 PROMPT 
288 .EKI. 


Pour commencer, toutes mes excuses | KA fonction 
ne à merveille à condition de ne pas se tromper 


en le recopiant! ( PPC-T n°4 page 21), 


Voici quelques routines qui peuvent faciliter 
la programmation synthétique: il s'agit de chan- 


gements de bases, 
Voyons les une par une, 


1 à 8 demande et stockage du mot secret D — H Décimol —« Hexadécimal 

2,4, : Stockage du mot lettre par lettre D en X mais inférieur à 1 E 10 à cause de 
25 à 32 : vérification du resistre aléatoire CRUE 

25 à 45 : initialisation des compteurs de mélange la précision des calculs, 

uk à 64 : mélange aléatoire des lettres Exemple: 1234567890 

6 à 66 : initialisation du compteur de coups XEQ "D = H" 

b7 à /7 : test d'identité entre l'affichage du joueur et résultat en ALPHA = 499602D2 

:e mot secret 

‘68 à 88 demande de déplacement D = B Décimal - Binaire 

ë9 à 105 réponse au déplacement testé bien ou mal D en X inférieur à 16777216 ce qui corres- 
110 a 112 incrémentation au compteur àe couos et fin pond à 24 1 capacité de ALPHA 
de Boncle TR | 2 Exemple: 1234 
113 à 14 Vérification des aonnées ue déplacement XEQ "D - B" 

125 à 13a messase l'erreur : 

LC à 154 reconstitution ae l'affichase FASUELUE en ALPHA. = 1091010010 

155 à 106 iSO!&LiOn dau Aière caractère au rot à trouver = 1 e 

1aa &OË : affiches eu résultat final, PPC-T Noë H = D Hexadécimal - Décimal 


JUILLET AOUT 
1983 PS 


introduire le nombre hexa en ALPHA 
Exemple: ALPHA ABC ALPHA 

XEQ H = D 
résultat en X = 2748 


Binaire — Décimal 
entrer le nombre binaire en ALPHA 
Exemple: ALPHA 101010 ALPHA 
XEQ B - D 
résultat en X = 42 


Tous ces programmes n'utilisent pas de registres 


de données, La pilæ est perdue. Total environ 30 
registres, donc sur une seule carte recto verso 


Bonne programmation 


T 207 
A+LBL “D-H' 31 KES 82 61 KO 91 EXTEF+ 
A2 RELFLAG 32 -i 62 RTK 92 RTK 
83 XCr 33 AROT 
4 | E18 34 RDK 63LBL “H-[" Q34LBL “E-p" 
A5 CF 87 35 RIK 64 CLST 94 CLST 
A6 GTO BE 36 INT 
37 K#67 65eLEL 43 95SeLEL 05 
A7+LEL “D-E" 38 GTO 81 66 ALENG 96 ALEHG 
48 RCLFLAG 39 KO 67 1 97 
A9 CT 48 STOFLAG 68 - gg - 
14 1é77rêté 41 CLST 69 K€6? 99 x447 
11 SF 87 42 AVIEN 78 GTÜ BE 188 GTO &6 

43 RTK 71 ATOX 141 ATOE 
124LEL AB 44 / 7è 48 192 RON 
13 K(=Y7 73 - 193 KEG INDT 
14 FACT 45eLEL 82 74 9 184 KCDY 
15 RDN 46 18 75 Xe? 145 2? 

16 FIX 4 47 Xé=Y7 76 XEG 84 186 KEY 
17 CF 29 48 GTO 8 77 RON 147 Yt£ 
18 CLA 49 AECL Ÿ 78 16 148 * 

58 RDK 79 KO 189 + 
19+LEL A 51 RTH per Z 118 ENTEF+ 
28 ENTEP+ 81 vtx 111 GTO 65 
21 F5? 87 SRéLEL 47 82 * 

22 2? S3 XCT 83 + 1126LFL 48 

23 FC? 67 54 XCY 84 EHTERT 11384 

24 16 55 ST L 85 EXTER+ 114 RTN 

25 ST Z 56 55 86 GTO 83 

26 MOI ge ST L 1156LBL 49 

27 IKT 58 KO L 87+LEL 64 él 

28 F5? 47 39 ATOR 88 RDH 117 RTK 

29 ARCL X 6m LT 89 7 

38 FC? 7 34 - 1186LEL 86 
119 RDK 
128 STü L 
121 CLST 
122 LASTX 
123 .END. 


MON OH ON ON ON ON ON N * 


Jean BOSCHAT 

4 ,rue DESCARTES, 

59760 Grande-Synthe. 
m7 


Grde-Synthe le 30/4/83 


Monsieur, 


Je vous envoie le programme TX qui permet,en 
utilisant la programmation synthétique ,d'entendre 
tous les "tones" dont le paramètre est spécifié 
en X.(paramètre compris entre O et IF). 


Commentaire: 2 

Ce programme utilise une astuce aui,à l'aide du 
registre b,fait lire par la HP le registre M comme 
un registre contemant des lignes de programme! 
L'essentiel du programme sert à remplir le registre 
M comme suit: 
octet I: JF code de l'instruction TONE : 
octet °: nombre que vous avez introduit et qui sera 
pris comme paramètre du TONE. 
octet3: OI code de l'instruction STO. 
octet#: 7C code de l'instruction FEAï | 
En fait,les trois premiers octetsA à sauche de K 
sont nuls,et sont nésligés lors de l'exécution. 


Re H: 00 OC CO 9F XX OI 70 
Ce registre équivaut donc aux lignes: 





TONE(XX) 
OTO b 
Ligne: :création de ©F 

(1a ligne est:FI ©F) —— | 
Lignes 03% /Hsvérifie que X inférieur à 128 et 


ajoute à droite e " :'oc’et 
corresrondant., 
Ligne £5sajoute à droite de : les octets GI et 7C 
(la lisne est dore: F37F 94 7c 
Lignes 26 et ?27:place le pointeur de prem en 
(adresse 06) pour l'exécution du tone et le retour 
sur le end de TX erâêce au 5TO b, 


Remaraue:on peut"55T" le progremre,mais on ne peut 
introduire d'instructions en peem si le 
pointeur se trouve en M(MEMORY LOST) 

La ©T affiche les tones de paramètre 
supérieur à © en ne faisant apparaître 
que le chiffre de l'unité. 

Far exemple,TONE(Z6) sera affiché TONE 6. 


Heureuse programmation... 


J.Boschat. 
4 “Ty 15 FS?C 7 

AieLEL “TE 

: FE 16 SF 49 
43 122 17 #C d 
A4 NOT 18 #éo 
95 LASTE 19 “+” 

86 + 28 STO : 
87 OCT . + 
BB K£i d SR 
49 FS?C 11 23 CLA | 
14 SF {2 24 STC l 
11 FS?C 18 23 "Hé 

12 SF If 26 Eë 

13 FS?C 49 27 RC b 
14 SF {4 28 .ENE. 


MON ON ON ON à OO # à + * 


Je vous propose un prem d'intégration très rapide et 
très précis. ( 3 fois + rapide que celui de Mr Leroy 
11 existe de très nombreuses façons d'intégrer 
par Gauss, Simpson, les trapèzes, Romberg etc ... 
mais quelque soit celle ci elle doitéfapide, précise 
mais aussi utiliser le moins d'octets possibles, c'es- 
pourquoi je vous propose un prem d'intégration par 
Simpson qui me semble la plus facile à mettre en oeuvr 
De plus celui ci est une version très optimisée du pre 
du module MATH ( qui à mon avis ne propose pas des 
programmes très performants c'est dommage ) en effet 
mon prgm n'utilise que trois registres de données au 
lieu de 8 et de plus utilise les registres d'état M,N 
et C. 
Ci joint une carte magnétique. 
Commentaire du prgm : 
Si vous ne disposez pas du XFtes, 
02 à 06 ( mais faire SIZE 003 }). 
Les registres 01 et O2 contiennent les bornes d'intégr 
tion a et b. Le registre 00 contient f(a)+f(b). 
La ligne O 24 contient le nombre d'intégration. 
ci doit être pair. 
Pour utiliser ce prgm c'est très simple 
1/ Programmer votre f(x) à étudier en commençant par 
LBLTFF ou autre ( mais alors modifier la ligne C 12 
puis XEQTIN. 
2/ a enter b 
SA XEQ a (ou R/S ) et automatiquement le prgm vous 
donnera 1 à 2 minutes après le résultat sous la 
forme Tl=rnnn,uaeeaeaa 
Voilà c'est tout 


supprimer les lignes 


Celui 


Happy programming 


J.F. FELANNE 

T 191 
BI+LEL "IH" 16 STÛ un 31 ST+ 48 46 + 
82 SIZE? 17 RCL 87 32 ? 47 ST+ 68 
83 3 18 KEO INDT 33 ST4 à 48 RTN 
A4 XT7 19 ST+ GR 34 68 
A5 PSIZE 20 RCL &@? 35 REL * 49+LEL 48 
46 CLX 21 RCL 41 36 X=Y? 58 3 
87 STOP 22 STO ] 37 GTO 46 91 RCL 88 

83 - 38 XE0 À Je RCL 81 

ASeLEL à 24 66 39 GTO 83 53 * 
A9 STG 45 25 4 405 
18 X5Y 26 STO 81 d@eLEL 86 55 / 
11 ST0 Ai êT » 41 RCE 4! 96 “I=" 
13 ASTO [ 43 RCL ] 18 PROMPT 
14 RCL A! 29+LBL 43 44 XEG IND © 99 CLST 
15 KEB INDE ! 38 XER 86 45 ENTER 68 .END. 


NON ON ON ON ON NON ON # # 


PPC-T Moëé 


JUILLET AOUT 


1N0N7 De 


Entrée Alphanumérique 


L'idée et le programme de base ne cet 

‘excellent livre de ., C. “YICKES : Synthetic Programming on the 

* 41 C écrit hélas en américain. Ce cher “illiam à pensé Y uti- 
-liser le drapeau n° 4: cour rentrer dens le registre alrhanumé- 
-rique une réponse qui, à l'affichage, prolonge le texte de la 
“uestion mais qui s'inscrit s‘oarement dans ce registre. En effe: 
e 409 drapeau ( Le n° 45 ) est levé lorsque l'on introduit manu- 
-ellement une séquence de données, sinon il est abaiceé. On peu’ 
-insi considérer qu'il est levé à chäque fois que l'on voit le 
caractère soueligné ( __) * la fin d'une séquence ( exemples de 
‘#quences : STC 9_ , 1983,12_ , DR_ ou encore SIZE fo de 

Mais attention ! Il ne suffit pas de lever ce drapeau pour voir 
ipparaitre le sousligné. Par contre, dins cet état, il permet de 
continuer manuellement l'entrée du reste de la séquence. \ais 
Pour peu que l'on ruse un peu, on peut faire afficher la question 
uivie de la réponse, si elle est alphanumérique, que l'on entre 
et n'écrire secrètement, dans le registre alpha, que la réponse 
‘eule. Tout simplement on utilise le registre d'affichige. C'ec 
ce qu'a fait William. 

Voici un exemple : XEQ' n'importe quoi et la machine répond : 
I9NNEE= , on est en mode alpha et on à la surprise de constater 
jue Si l'on tape E on obtient : DONNEE=E_ mais si l'on sort et 
rerentre du mode alpha on lit E tout simplement. Cela permet de 
nous rappeler toujours de la question auand on écrit la réponse. 

Programme 6 combien qénial mais auquel je trouvais un petit 
défaut : la question devrait pouvoir posséder un point d'inter- 
-rogation final ou un caractère sousligné qui disparaitrait seul 
iors de l'introduction de la réponse. Et après maintes recherches 
ie puis vous affirmer que c'est possible ! D'ailleurs la preuve 
‘4 Suivre. 

kh ! Une petite restriction quand même : 1: question ne peut 
$tre composée que de 6 caractères, point d'interrogation inclus, 
‘nconvénient que n'a pas la version d'origine. 

Les trois programmes dont les listes suivent sont : 

— £A9 : pour le programme d'Entrée Alphanumérique d'Uriqgine de 
.C. WICKES . 

- EA : pour le programme d'Entrée Alphanumérique type que l'on 
insère dans le programme où l'on pose la question. 

- SEA : pour le Sous-programme d'Entrée Alphanumérique que l'on 
tilise ainsi : placer en alpha la question à poser sans son 
soint d'interrogation ( moins de 5 caractères \ et faire XEJ'SEA 
» au retour la réponse ect dans le registre alpha. 

Remarque : ces programmes détruisent les registres T, L ( sauf 

sur EAO ) et alpha, mais ils conservent le registre d et donc 
‘ous les drapeaux. 

Programmation : seule difficulté : la chaine alpha qui est 
‘insi codée : 242 4 128 en décimal et F2 94 8% en hexadécimil. 


sTticle proviennent de 


GEORGELIN Daniel T 57 


P.S. : SEA détruit aussi le registre Z. 


11eLBL “EANL* 2SeLBL "SEA" 


L2eLBL “ER in 

13 -R=79" aires 

jé à 14 ASTD L . # 
83 REL € x 3 REL [ 
84 XE5 à 18 RCL € 31 KO d 
ouee 17 KE} d Nr 

pr 18 “Re” + 
87 CL 19 AYTER 4 AVIEM 

88 STOP 2b VIEN L : en ÿ 

89 XC: d 21 CLA 36 CLA 
ES 22 STOP 

 . 37 STP 

#3 AC d 38 x: d 

24 RH 39 .EHE. 


UN NN NN NON NON NN N° N NN # © N 


Jean daniel (TI) DODIN 
ue CAGIRE 
3II0U TOULOUSE 


lean (T250) FEVRE 
100, Rue CL\UDE DECAEN 
55012 PaRis 


7 
17, 


PARIS le, 9 mai 1983 


Cher Jean Daniel, 
Cette lettre est divisée en trois parties: 

.Unrappel sur la structure des fichiers de 
l'extension memoire du module X FONCTIONS. 

.Un programme "'DP' (Décimal to Program), qui fait 
la meme chose que 'LB' de Lionel ANCäL:l (cf PPC-TN°1), mais 
il est plus souple d'emploie. 

Un programme !'PX! 
sur sa 41C. 


permet de jouer au pendu 


qui 


AS FICHIERS DE L'EM DU MODULE X-F 


Introduction. 


sb 


Le manuel d'urilisation du module nous dit que 
les deux premiers registres d'un fichier forment l'en-tete, 


Le premier registre d'en-tete contient le nom du fichier, 
complété à 7 caractéres par des espaces. Le deuxième registre 
Contient divers parametres, C'est ce registre que nous allons 
étudier pour chaque type de fichier. 


-2- Fichiers lrogramme, 


Le second registre d'en-tete d'un fichier programme 
à la forme suivante: 


[0 00 00 00 BB BR hi 


RH : ce sont les digits 0,1 et 2 
taille du programne en registres 


BBB : les digits 3,4 et 5 donnent 
programme en octets (bytes). 

I : le digit 13 indique le type 
à 1 un fichier programme, 


ils donnent la 


la taille du 


du fichier, donc 


Après ce second registre on trouve le programme, sous sa 
forme habituelle (ce qui permet d'executer des programmes 
dans l'EMJ. Dans le dernier registre du programme à la 

suite du dernier octet du programme on trouve un octet de 
Controle. Cet octet est la somne de tous les octets du 
programme modulo 256. Chaque fois que l'on rappel un programm 
de l'EM vers la mémoire la IP cotrole ce dernier octet et si 
il n'y a pas correspondance on a: CIKSUM l'IR. 


Dans BBB on ne tient pas compte de l'octet de controle, mais 
dans Rift on le prend en compte, donc: 


RRR = INT((BBB+7)/7) 


-3- Fichiers de donnees. 


Le second registre d'en-tete d'un fichier de 
données à la forme: 


2A AA 00 U0 PP PR RR 

RRR 

PPP 

AAA : 

à zéro 

2 : 

I1 n'y a rien d'autre à rajouter si ce n'est que les registres 
de données ont la meme iorme que les registres "normaux". 


taille du fichier en registres. 


valeur actuelle du pointeur de registres. 


adresse absolue du deuxième registre d'en-tet. 
si le fichier est vide (à la création). 


type du fichier, 2 pour fichier de données. 


ASCII. 


Le second registre d'en-tete d'un fichier ASCII 
de la forme: 


3A AA 00 CC EE ER RR 
taille 


Fichier 


= 

est 
RRR : du fichier en registres. 

EEE : 
CC  : 


AAA :adresse absolue du deuxième registre d'en-tete 
à zéro si le fichier est vide. 


3 : 3 pour les fichiers ASCII. 


Insuite chaque enregistrement est précédé d'un octet qui 
indique la taille de l'enregistrement (entre 0 et FE). Enfin 
le fichier se termine par un octet codé FF. 


valeur actuelle du pointeur d'enregistrements. 


valeur actuelle du pointeur de caractères. 


type du fichier, 


-5— Conclusion. 


Enfin, la derniére chose à rajouter est que le 
dernier fichier dans l'EM est suivit par un registre donc 
tous les octets sont à la valeur FF. 


-1- Fonction. 


Ce programme a pour objet de rentrer des programmes 
(si on en a le courage!!}), ou seulement des instructions 
octet par octet. Chaque octet etant entré en décimal, 


Pour faire ces opérations, 'DP' utilise le module 


Y FONCTIONS et son extension mémoire. 

‘DP' sera surtout utile lors de l'introduction de 
programmes avec un fort pourcentage de fonctions ou de chaines 
synthétiques. 

Ce programme à une mise en oeuvre plus simple que 
"LB' de Lionel ANCL.T. On n'a pas besoin de savoir le nombre 
d'octets à introduire, et il n'utilise aucun autre programne 
en complément. 


PPC-T Noë 
JUILLET AOÛT 
19822 P7 


PANTE Ligne 71 4 les sept caractères ü® gauche forment 
Utilisation. le contenu d'un registre 'c! qui place 
01,62,..:,G6. *cprosentent les octets entrés, le rideau en OBE. Les quatre caractères 
ne RIT CHACL suivant forment le debut du deuxième 
CLVI Ei AFFICHAGE registre d'entete d'un fichier programme. 
XEQ ‘DP' BO- Lignes 72 à 77: à partir du nombre d'octets entres 
o0 R/S BI - on calcul la taille du programme 
ol R/S B2= en registres, 
. . Lignes 78 à 95 : à partir de la taille en octets et 
Ts. ‘ en registres du fichier on calcul 
de LS | les trois derniers octets du second 
registre d'en-tcte du fichier 
A ce moment le dernier programme présent en mémoire est celui Programme contenu dans le registre 
que l'on vient de rentrer octet par octet. alpha. 
Lignes 96 à 10I : on nlace le rideau en OBE puis 


—3— servations, à 
3—- Observ: on range à cette adresse le second 
registre d'en-tete que l'on vient 


. "DP' utilise le module XF. 
de calculer, 


. Tous les fichiers de l'EM sont perdus. 
du programe le directory est vide, 
Tous les flags conservent leur état initial sauf 
le flag UIl qui est baisse. 


A la fin 
Lignes 102 à 103 : on rappel le fichier en mémoire 


programme. 


Lignes I04 à I12 : SOUS-programme qui initialise 
l'extension mémoire en placant 
zéro à l'adresse 040 qui cest le 
registre système de l'EM du 
module X-F,. 


—-4— Pile. 
Au cours du programme les registres X,Y,2Z,T et L 
sont perdus. 


Etat final de la pile: 


T- contenu du registre OBE OIxXLBL' DP' 39 GTO OI 77 INT 
Z= valeur de c mettant ROU = (0BE) 02 XEQ 06 40 XC> M 78 XOY 
Y= 0 03 122 AI SAVEX 79 RCL x 
X- valeur actuelle de c 04 'x! 42 GTO 00 80 16 
05 CRFLD 43XLBL 03 81 f 
L= x 06 CLST 44 STO M 82 XTOA 
| 07 STO L 45 XCD a 83 
-5- Registres. 08 RCL d dd. 00 à - rs L 
On utilise aucun registre. on travail en size 000, 09 STO a 47 SF OI 85 LASTX 
10 FIX 0 48 CLX 86 x 
-6- Flags. II CF 29 49 I92 87 NCL Y 
+ OUI pour entrer le LND nt . vi 02 256 
. 22 téste l'entrée d'un octet et permet de sortir 14 CLA 52 XEQ 02 90 / 
de la boucle d'introduction. 15 CLX 53 9 91 SOS 
+ 30 flag du catalogue, toujours à l'état bas, sert 16 6 E-3 54 XEQ 02 92 RDN 
à créer la négation de la fonction ISG. 17XLBL OI 55 CF OI 93 256 
: 18 FS? OI 56 LASTX 94 MOD 
-{— Remarque. 19 RTN 57 RCL Z 95 XTOA 
Le registre 'a' de la pile systéme sert à stocker 20 RCL M 58 256 96 RCL N 
le contenu initial du registre des flags ‘'d'. 21 'B' 59 MOD 97 X<3 c 
22 ARCL L 60 XTOA 98 RCL M 
-8- Description du programme. 23 "He! GI X4> Z 99 STO 00 
Ligne 02 : initialisation de l'EM. a nn de _ He M 
Lignes 03 à 05 : création d'un fichier données de 26 FC? 22 64 FS? 30 102 'x! 
122 registres, de nom 'x'. 27 GTO 03 65 GTO 05 103 GETSUB 
4 [re ! x 
Lignes 06 à 07 : mise àzero de la pile et du 22 Re or Le 
PERS US L qui sert de compteur 30 RDN 68xLBL 05 106 RCL M 
d'octets. 31IxXLBL 02 69 RCL M 107 X6Ÿ £ 
Lignes 08 à 12 : sauvegarde du registre 'd' des 32 XTOA 70 SAVEX 108 SIGN 
flags dans le registre 'a'. Ce 33 ST+ Z 718 ARE 109 STO 60 
registre reste intact tant qu'il 34 CLX 72 XO Z I10 LASTX 
n'y a pas d'appel à un sous-pro- 35 E 73 RCL X III STO c 
gramme. Insuite on formate l'affi- 36 ST+ L 74 7 II2 END 
chage et on baisse le flag OI, qui 37 RDN 75 ST+ Y 
levé transforme la boucle d'entrée 38 ISG X 76 / 
en sous-programme, 
Ligne 71 FB IO 00 O1 69 0B 10 AO [0 00 00 00 


boucle d'entrée des octets, on 
rajoute chaque octet dans le 
registre alpha et tous les sept 
octets on a ainsi un registre que 
l'on sauve dans le fichier (ligne 
41). On fait la somme de tous les 
octets (ligne 33) et le compte de 
ceux-ci (lignes 34 à36). 

On quitte la boucle d'entrée 
lorsqu'il n'y a plus d'entrée 
numérique(lignes 26 et 27). 


S 
re 


Lignes 13 à 
F2 7F 00 


F7 10 00 01 


Ligne 66G : 


Ligne 105: 69 00 40 02 


PX — Pendu 


_-I- Fonction. 


Ce programme est une version pour HP-4IC du jeu 


Lignes 43 à 47 : on remet l'affichage dans son bien connu du pendu. 
format initial (lignes 45 et 46). £ L ss à D € y 
Puis on léve le flag OI afin de La version présentée ici est la Ciquième que je fais 
transformer le boucle d'entrée en (1a seconde avec le module XF). Le fait d'utiliser le module 
Sons-progranme . XF en plus de racoucir le prograïïie permet d'utiliser un 
fichier de mots. 
lignes 48 à 55 : on rentre un END à la fin du 


programme ( octets 192,0 et 9). -2- Utilisation. 


Lignes 56 à 60 : réduction à huit bits de la somme CLAVI Hi \FFICHAGE 
des octets, "AFFICHAGE 
Lignes 61 à 70 : on compléte le dernier registre à XIQ PX' MOT 
a— soit on rentre 


sept octets par des nuls puis on 
range ce registre dans le fichier. 


PPC-T Hoë 
JUILLET AOÛT 
1983 P8 


un mot (10 let 
tres max), R/S 


D HR Éd 
un mot dans le 
fichier PA, kR/S 

par exemple on rentre 


PENDU R/S PL 


à ce monent on tape une lettre, si elle est dans le 
not elle est placée (P N U), si elle n'y est pas 

le pendu commence à se”dessiner. À la fin pour 
reconmencer une nouvelle partie on tape R/S, 


-3- Observations. 


-'PX' utilise le module XF. 

+ Il faut un fichier alpha ‘PA' contenant un mot 
par enregistrement si on ne veut pas rentrer de 
mot a chaque fois. 

- La version présentée ici utilise le module TIME 
Pour générer des nombres aleatoires. 

—4- Pile. 


La pile est perdue ainsi que le registre L. 


—-d— legistres, 


On utilise 15 registres pour ce programme, de 
t00 à RI4. 
R0O0 = code ASCII de la dernière lettre du mot 


ROI a R09 = cude ASCII des lettres trouvées ou 
du tiret, et code de la première lettre. 


RIO = caracrères du pendu non encore utilisés, 
RIT - caractère actuel du pendu. 


RI2 - nombre de caractères du mot moins un. 
RI3 = les six premiers caractères du mot. 


RI4 - les quatre derniers caractères du mot. 


-6- Flags. 


+ 05 mis à un lorsque le caractere envré se trouve 
au moins une tois dans le mot. 


+ 23 entrée alpha, est testé lors de l'introduction 
d'un caractère. 

—(- Remarque. 

Avant de lancer le programme il faut que le flag 
5 soit baissé. 

-8- Description du programme. 
Lignes OI à I2 : 
Lignes 13 à 20 : entrée du mot. 


initialisation du programme. 


Lignes 21 à 23 : test si un mot est entré. 


Lignes 24 à 32 : générateur aléatoire de nombres 
compris entre 0 et 65. 


Lignes 33 à 35 : récupération d'un mot dans le 
fichier. 


mise en mémoire de la taille du 
mot et des première et dernière 
lettre du mot. 


Lignes 36 à 60 : 


Lignes 61 à 84 : routine d'affichage du mot 
inconnu et demande d'un caractère. 


regarde si la lettre entrée est 
dans le mot une ou plusieurs fois. 


Lignes 85 à III 


si la lettre est dans le mot 
alors on compare le nombre de 
lettre déja trouvées au nombre 
de lettres à trouver pour voir 
si le joueur a gagné, 


Lignes 112 à 126 : 


Lignes 127 à 139 : si la lettre n'est pas dans le 
mot on regarde si le joueur à 
perdu sinon on passe au carac- 
tère suivant du pendu. 

Lignes [140 à 113 : si on gagne... 

Lignes 144 à 148 : si on perd... 


Lignes 149 à 159 : affichage du résultat. 


1! ‘14 59 aCL N IU5 + 

IH HCL 1 60 CL À! IUs — 

[5 Xe» d 61 LIL 0 : L07 XD 

[It "MOT : 62 RCL 1: [08 :I0x 

17 AVIEW 13 SIGN 109 S£f0 IND Y 
18 CLA O4 HDN 110 SF 05 
19 STOP 55 CLA III GTO 05 
20 X<> d 66XLBL 03 II2XLBL 06 
21 ALENG 67 RCL IND L I13 FC?C 05 
22 X#0? b8 XTO, 114 GTO 07 
23 GTO OI 69 RDN 115 RDN 

21 TIME 50 DSE L JIG AROT 

25 FRC 71 GTO O0} I17 CLX 

26 R-D 72 RCL 00 118 RCL 12 
27 FRC 73 XTOA I19 E 

28 EG6 7+ RDN 120 - 

29 x 75 Up ? 121 X-Y? 

30 66 76 RCL II 122 GTO 08 
3I MOD 77 XTOA 123 XCY 

32 INT 78 RDN 124 RCL N 
33 'PA' 79 AVIEW 125 RCL M 
34 SELKPTA 80 CF 253 126 GTO 02 
35 GETREC 8IxLBL 04 127xLBL 07 
36x*LBL OI 82 PSE 128 X{}> Z 
37 ASTO 13 83 FC? 23 129 RCL N 
38 ASHF 84 GTO 01 130 RCL M 
39 ASTO I4 85 RCL d 131 CLA 

40 CLA 86 AVI! 132 ARCL 10 
AI ARCL 13 87 STO 4 133 ATOX 
42 ARCL 14 &ë RDN 134 ASTO I0O 
43 ALING 89 ATOX 135 X=-0? 

+4 E 90 X6> Z 136 GTO 09 
45 — 9I STO N 137 STO II 
46 STO0 I2 92 X<2Y 138 RDN 

139 GTO 02 146 153 ARCL 13 
140xLBL 08 [47 STO II 154 ARCL 14 
I4I 'GAGNE...! 148 TONE 0 155 ‘+! 
142 TOKE 9 149*LBL 10 156 RCL II 
143 GTO I0 150 AVIEW 157 XTOA 
144*LBL 09 151 PSE 158 CLD 
145 "PENDU... 152 CLA 159 END 
Ligne 03 : F5 27 60 06 04 05 


Ligne 13 : F2 04 80 


Voila j'éspére que cela vous interressera et je su 
à la disposition de ceux qui veulent des renseignements 
complémentaires. 


Happy Programming: 
Jean (T250) FEVRE 


nn à 


* XX * 


REACTIONS - SUITE 


en particulier sont ceux qui donnent une notion globale et 
non en profondeur comme c'est souvent le cas par exemple, 
J'ai aimé l'article de Synthèse sur les différentes publications 
traitant de la HP (n°3). De même l'article de Molfgang Baltes 
est bien car il remet en place et situe l'HP-IL; moi-même 
J'y perdais mon latin Convertif$eur, moniteur et même une 
Eprom avec le sacro-saint sigle HP-IL en "postfixe". Bien 
sûr il faut des articles de fond mais surtout plus d'article 
de banalisation car en général le débutant bute sur des choses 
trés Simple et il suffit de lire un article particulier 
pour que le déclic se produise (comme ce fut mon cas). Très 
intéressé aussi par l'article sur les codes barre : j'ai recher- 
ché dans l'OP n°6 Île programme pour créer dés CB sur la 82143, 
Ça marche ! j'imagine que le buffer est en fait une RAM particu- 
lîère ; ne serait-il donc pas possible de la changer (après 
tout un CMOS quand on prend ses précautions c'est pas difficile 
à Souder) pour avoir des CB sur une ligne ou des instructions 
de 2 octets(RCL M etc...). Quelqu'un à dû y penser avant moi 
‘où cela cloche-t-il ? Autre chose sur le coté gauche de 


la 82143, il y a une petite “molette crantée" en inox : j'ai 


appelé ça un "budine" (pourquoi pas ?) mais à quoi cela peut- 
il bien servir, mystère, mystère... 
Dès réception et lecture du bulletin je fis un bond à la lecture 


OIxLBL'PX' 47 XQ L 93 STO M du nouveau prix des modules. 

02 AON 48 CIIS 94 RDN Battant le rappel des fanas du coin, on avait décidé de commander 
03 t'TJxt 49 AROT 95 RDN 7 modules (3xF + 2xM + 2 Time). Aucun relais FNAC n'existant 
O4 ASTO 10 50 A\TOX 96 ALENG à Montpellier, l'expédition était montée pour Lyon, Marseille 
05 32 51 ST0 0O OT XOY ou Toulouse. Notre ardeur (et notre moral) fut vite refroidie 
06 STO II 52 ATUX 98: LBL 05 En apprenant qu'il fallait acheter pour bénéficier de ces 
07 I.00# 53 ST0 IND L 99 POSA tarifs une HP, un lecteur ou une imprimante (etc...).Heureuse- 
08 95 5 XC> Z I00 X<0? ment en parcourant d'un oeil morne et triste l'OP, je tombais 
09xLBL 00 55 XT0A IOI GTO 06 en arrêt devant une pub de la Maison Duriez annonçant les 
IO STO IND Y 55 XTUA 102 AROT mêmes ristournes, renseignements téléphoniques pris, pas de 
11 ISG Y 57 AO! 103 problème nous avons pu tout commander (nous sommes 5 au 
12 Gf0 Oo ou . LOST ppc-T Noë 
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Jean BROSC::, 
#,rue lescartes, Srde-5rnt'e 
59780, FRE D eUVNTHR. le 10/4/E:z 
NrrT 
: [5 


Cher Monsieur, 


Après vous avoir envoyé la version lécourtée" 
du programme KA,j'ai voulu comrrendre pourquoi ce 
Programme rose des problèmes lorsqu'on a supprimé 
un où plusieurs assicnements.ïn effet,mes seules 
connaissances sur la mémoire d'assisgnation (que 
j'avais mises dans le commentaire) proviennent de 
AF,et ne permettent pas d'exrliquer ce problème... 

J'ai alors entrepris l'étude de la m°moire 
d'assignation en utilisant le prorramme suivant: 
OI LBL TEST 1.8 ligne O0? est:F5 CI 5C OC FO TO 


"x8 #4 (conre dans KA) 

RCL ec L'utilisation en est simple:l'"ruis 
ASTO c R/S nous donnera en M le registre 
XOY OCO que l'on pourra visualiser en 
RCL IND X mode alpha.I78,R/S nous donnera de 
RCOL Z la même façon le reristre supérieur 
STO c OCI et ainsi de suite... 

RDN Melgré la normalisation,on peut 


IO STO :! 8insi comprendre le fonctionnement 
de cette partie de la mémoire ,mais 
les assignements sont transformés en XROM 03,46 
qui correspond à 1/X. 

Éprès chaque essai,il faut remettre la mémoire à 


Zero par un MEMORY LOST. 
Finslement,je suis parvenu aux conclusions suivantes: 


l)La mémoire d'assignation cprmence tier à raréire 
de OC0O vers les adresses supérieures, 
: )Les registres d'assignement ont bien le format: 
FO 
T23E5E 
let£icode de fonction sur deux octets.l'octet 1 
est rempli par un octet ‘“boucie trou" O4 
(aui correspond à LBI O*\si la fonction 
n'occupe qu'un octet. 
5: code touche sur un octet,. 
ses octets 4,5 et 5 jouent des rôles 2nslorues pour 
une seconde assignation. 
3)Après un memory lost,si l'on #ssizne sans jrmais 
effacer d'assirnement,la F] remplit les recistres 
de droite à gauche. ors d'une assisnatior,elle 
Complète la partie gsuche de OCO si celle ci est 
vide, sinon elle décale tous les reristres d'asei- 
nation vers le haut et remplit la droite de OCC. 


1 l'on effectue ASN + 11 après un . E:ORY IC5T,et 
donc si cette assienation est la seule en mroire, 
le registre CCC est: 

FCO GC 00 OC © 40 OI 

efface une assipnation,la HF baisse 
registres + ou e, mais elle se 


le code touche dans le. registre 


S)Dans le cas énéral,lors d'une assignation,la HI} 
commence par rechercher dans TOUTE la mémoire 
d'assignement s'il y a un code touche à zéro dans 
un demi resgistre,.Dès qu'elle en trouve un ele y 
place l'2seisnement,sinon elle décale tous les 
reristres et le place à droite de OCC, 
La recherche s'effectue dans l'ordre suivant: 
partie droite de QCC GES en de 
partie gauche de OCC U 3 
partie droite de QCIi OC4A — —— 
partie sauche de OCI bob -h 
et ainsi de suite..... 
Ceci explique rourcuoi la 
pour effectuer un sssirnerent si 
beaucoup en mémoire, 
5i on 3 effacé ur ou deux essirnerents,èe procr2m- 
me KA riscue donc de ne pas fonctionnersen effete 
si on,2 supprimé un assisnerent: 


4)Lorsqu'on 
les index des 


contente d'snnuler 
d'assicnementli! 


LT met assez lonstemps 
il v er a déjà 


J__ces:si le reristre CCC est totalement | 
rempli lors du messare 5215157 2 T,la preris 


re 3ssirnation occunera les 3 octets de celle 

qui 8 été supprimée,la seconde sera dans OCO 

après décalare des reristres:le prorramme 

mapchera. | 

2/_cas:8i seule la nartie droite de CCC était 
remrlie,les deux touches sont bien assicn’es 
mais l'assisnerert qui se trouvrit à droite 
de CCO est perturhé, 

si on a sunprimé : =ssirrements: 
les : nouveeux °ssi-nemegts sont 
mais deux nauitres sont rerturhés, 


effectués, 


JUILLET AGUT 
1A907 P16G 


‘larsruton reassione ue +o::cre 253 n°e8,13 

ne rerriace 5 A6 darl re ‘istne ngegr ven 
l'ancien assirnemert de cat:a “o1crn,.:l1e arnule 
l'assianation rréciente ele re- l'ocier du code 
touche à zé6ro),ruis effectue la -ecorce ascienation 


N 


conre d'crit au 5), 


la séquence: 7% : 77 {7 - 1. a le même effet 
ques 5h + I71/ 35 Alrhs ra 1./ ï » I] 
Cette règle reste valatle même si l'on assirne à 


assignéett! 
TIC 2,7 


LU Lt , 


une touche 1a fonction qui - était déj 
/)Lorsque l'on presse une toucie er mode 
le FI effectue les opérations suivantes: 


-elle reparie si l'index correspondant est levé 
-Si non,elle effectue la fonction qu'on aurait 
obtenu en mode normal, 
-Si l'index est levé: 
ie 4F recherche dans la mémoire d'assignation 
dans le même ordre qu'au 5) si une fonction 
est assignée. 
Si oui,elle l'exécute,si non elle recherche si 
un prorramme en mémoire vive est assigné à la 
touche, 
ce Ste ,18 machire doit forcenment trouver 
quelque chose,sinon c'est que l'index a été armé 
de façon artificielle(en synthétäque...) et elle 
se "plante" lamentablement!! 


8)Les assignements de prosramne n'utilisent pas de 
place en mémoire car ils ne sont pas stockés dans 1 
la mémoire d'sssignement,le code touche étant enre- 
GiSiT® dens le 4°”octet du 1abel global. 

Les assignetions de prosremmes en ROM constituent 
une exception.Le label ne pouvant être modifié,ils 
Sont enteristrés dans la mêmoire d'sassignement 
comme une fonction standart. 


9) Un FACKING 8 pour effet de supprimer dans la 
mémoire d'assignation les registres où les deux 
octets de touche sont à zéro.Les registres où un 
seul code touche est à zéro ne sont pas modifiés! 


10) Iors de l'enregistrement d'une carte d'état 
(par WSTS) ,le contenu de Ia mémoire d'assignement 
est recopié tel quel,sans FACKING préalable. 


OUFI J'avais envisagé de taper les exemples qui 
m'ont permis de parvenir à ces nombreuses conclu- 
sions ,mais il y en aurait encore pour # pages..... 


Jour finir,voici un court programme utilitaire 
que certains ne connaissent peut-être pas encore. 
"en" place le pointeur de programme au niveau du 
-.D.permanent,ce qui permet d'accéder facilement 
au dernier rroeramme en mémoire. 


OI ZIBE EN Commentaire: 
. ï lignes Ci à O7: isolent les deux 
En 0 derniers octets de c,qui contien- 


Se -nent l'adresse du .END. dans les 


as 3 dirits de droite. 
ASEF lignes O8à IS:mettent le premier 
SCT d digit à 3(cad OCII en binaire) 
ASTC d aui deviendra le pointerr d'octets 
CF O8 du registre b, 
CY OQ 
SF IC lienes 16 à I°: stockent le recistre 
SF J] ainsi constitué dans b, 
ARCEL à 
570 4 
Fâ:A 
RCI : Feureuse procrammation... 
STO b | Er 
JC END 1 se 
fo 


— À 


MNUNUNOUONON ON N à «à 
XX XX K XX KE %k Æ K *% 
Quelques remarques sur l'interface vidéo IL: 


Cet interface ne réagit (hélas) 
aux sollicitations du type imprimante. Par exemple 
spécial E (append) est traduit par un blanc, ce qui 

Î 
jl 


trés bien 
le caractère 
est génant 
au registre 
"traduits", 


pas toujours 


dans les listages ! on ne sait plus ce qui est ajouté 
alpha et ce qui l'efface. D'autres caractères sont 
par exemple ENTER À est traduit par ENTER”. 

Un des avantages principaux de cet interface est la possibi- 


lité d'avoir une copie de la pile à chaque opération, qui 
facilite beaucoup les mises au point de programmes. Mais, 
qui sait pourquoi? cette Copie de la pile n'a pas lieu lors 


d'une entrée de chiffre, 
la pile et perd t. 

Cette recopie de la pile est interrompue par un R/S: 
il reste sur l'écran une partie de la pile: celle-ci est imprimée 
en commençant par t puis z, puis y et enfin x (pas de Last 
x); un R/S peut donc vous laisser avec seulement t où t et 


alors que cette entrée fait monter 


PPC-T Noëg Z::-la reprise se fait à l'instruction suivante. 


ES tHISLIUCLIUNS 1IIeGales et les autres: 

La fonction ACCRH doit envoyer à l'écran le caractère dont 
le numéro est en x. C'est OK sauf pour les caractères de contrôle 
10 (Passer à la ligne) et 13 (retour en début de ligne) qui 
ne répondent pas. IT faut alors placer ces caractères en alpha 
et faire OUTA, ce qui détruit le registre alpha. L'indicateur 
17 ne semble pas avoir d'effet là dessus, ais-je oublié quelque 
chose? 

La fonction ACCOL, illégale, fonctionne trés bien! mais bien 
sur elle n'accumule pas des colonnes qui ne sont pas reconnues, 


par contre : 1) elle écrit un blanc à l'emplacement du curseur, 
2) elle envoie Île caractère dont le numéro figure en x, y 
compris les caractères 10 et 13 !!! par contre l'espace inscrit 


empêche l'utilisation de ACCOL pour des séquences d'échappement. 
SKPCHR , illégale a comme effet d'effacer (écrire un espace...) 
un caractère, mais affiche DATA ERROR si le nombre en x n'est 
pas compris entre 1 et 23. 

SKPCOL accepte des nombres de O à 167. De O0 à 7 SKPCOL efface 
2 caractères, des 8 à 167 elle efface 3 caractères. 
BLDSPEC/ACCSPEC fonctionne comme ACCOL quand on utilise le 
code du caractère, mais permet d'envoyer plusieurs caractères 
d'un coup.Ceci ne modifie pas le registre alpha et peut donc 


itre utile. 
DD (T1) 
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C'est en lisant le PPC journal de Janv/Fe# 83 
que j'apprends la disparition de "KEY NOTES". 


Aussi je propose de reprendre cette rubrique 
dans notre journal, en publiant régulièrement des 
routines remplissant, autant que possible, les 
conditions suivantes: 


1/ caractère inédit, 
2/ d'intérêt général, 


3/ utilisation maximale des possibilités de la pile 
(entrées-traitements-sorties), 


4/ne recourant pas à la programmation synthétique. 


Je m'explique: 


En ce qui concerne le premier point il 
est bien entendu qu'il srait malhonnete de piller 
les excellents ouvrages qui existent tels”: 


MPROGRAYMER HP41® Descamps & Dhenin Editions PSI 
"CALCULATORS TIPS & ROUTINES de DEARING etc... 


Ceci étant tout le monde ne lit pas l'anglais 
et il est regrettable que des possesseurs de HP41 
ignorent des routines fondamentales comme: 

"IN "OUT" "Y/N?" (Key Notes V5N1p14) x 


Dans ces conditions je pense qu'il serait bon, 
avec l'accord de HP, de publier, après traduction, 
ces routines et quelques autres en les classant, 
par exemjÿb&e selon le plan suivant: 


-SAïsie: ex "IN" > 

-AFFichage: ex "DISPSr V5N2p13 
-IMPression: ex "AV" V5N2p12 
-GRAHiques: ex "DATA2" V5N2p12 
-CALCuis: ex"FAC"  V6EN4p10 
-TRAITement: ex "SQRT" V6N4p14 
-DIALogue: ex"Y/N?" > 
-PROGRAMmation: ex "GOSUB" V5N3p14 


- etc... 


(ou COURBES) 


J'ouvre cette rubrique en 


vous proposant "MN" (MiNimum/maximum) et je lance 


Ni 


un appel à tous les lecteurs pour l'alimenter 


car seul je n'irai pas loin... 


Il est tout à fait sûr que PPC-T a une fonction 
voisine de celle de Key Notes, en peut-être un peu plus élaboré, 
le niveau de Key Notes n'ayant pas toujours été trés relevé. 
Publier un résumé de tout cela est un trés gros travail pour 
celui qui fera la compilation et me paraît justifier une version 
française de Calculator Tips and Routines, ne serait-ce que 
parcequ'il ÿ a eu beaucoup de choses vues depuis CTR. Je suis 
en train de mettre en place une maison d'édition et je suis 
pret à examiner tous les projets de manuscrits . Qui va s'y 
mettre? 


METHODOLOGIE DE LA 
PROGRAMMATION 
HP 41 


Quand on souhaite soumettre à la bibli- 
othèque HP un programme il faut le documenter à 
l'aide de formulaires spécifiques. 


Ces documents, bien conçus, se révèlent 
utiles lors de la mise au point des programmes; la 
page consacrée aux "registres, indicateurs & modes 
opératoires" étant même un outil que je trouve 
indispensable. 


Toutefois rien n'est prévu pour les 
labels, sauf à utiliser une feuille de “"listage 
du programme"et à la compléter des labels locaux 
et autres labels. 


Pour pallier cet inconvénient j'utilise 
le document, dont photocopie jointe, qui reprend: 


-les labels numériques de 9 à 99 
-les labels alpha de "AùZ" & de "a à e" 


et ménage de la place pour d'autres labels 


Vous remarquerez que sont surlignés 
d'un trait fort: les labels numériques courts 
de deux traits forts: les labels locaux alpha 
d'un trait fin : les labels numériques corres- 
pondant aux codes touches (pour une uti- 
lisation simple de "GETKEYS" (module X) 
Par ailleurs les registres de la pile sont entourés 


Espérant que vous publirez ce document, gran- 
deur nature, afin que vos lecteurs puissent aisé- 
ment utiliser des reproductions photocopiques, 
je vous prie de croire à mes sentiments les 
meilleurs 


J FURGEROT 
PRPC 8435 
PPCT 156 


Je pense que la réalisation de cette feuille 
est trés simple à partir de vos indications, sans qu'il soit 
nécessaire de la publier. 


PPC-T Noë 
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TIPS & ROUTINES 


O B JET : compare un nomore (nb) à un maximum 
(MAX) & à un minimum (min) et ressort dans le 
registre X: 

-nb si min< nb <''AX 

-min si nb< min 

-MAX si nb AAX 


Pour utiliser la routine il suffit de placer 
nb + Z , MAX æY et min + X puis d'appeler'MN 


b———————— "1 
XE MP t dans un programme de calcul de 
l'IRPP (impôt sur le revenu)la déduction possible, 
au minimum de F1800 est limitée à F 50900 : 









1888A,46 EHTE 
39988,08 EXTERT 
1886, 58 

MER “HN” 
18948,.68 xxx 


UTILISATION 
-drapeaux 

registres 

-labels NEANT 


accessoires 










688DG, RE ENTERT 
94946. 684 ENTER 
1548.68 

8ES “MH” 
54984. 68 +++ 


-modules 










AUTEUR: J FURGEROT PPC 8435-PPCT 156 


1886.06 ENTERT 
38988,48 ENTER 


586,88 
MER “MN° 
1884.48 +++ 






Gli+LBL “HH" 
62 RDH 
GZ5 H<=TT 
4 RTH 
GS RDH 
Gé A<ET 
Gr RH 
GS K=TT 
49 RFTH 
18 K>T7 
11 FTH 

12 ASE T 
153 EH 





J FURGEROT PPCT156 Montrouge 20/4/83 


Cher Monsieur DODIN, 


Une méchante appendicite me contraignant au 
repos, j'en profite pour passer de l'état stable 
de membre inactif à celui, qui je l'espère ne sera 
pas instable, de membre actif du PPCT. 


Faisant suite aux deux articles que je viens 
de vous faire parvenir (TIPS & ROUTINES + méthodo- 
logie de la programmation HP41) je vous en adresse 
ci-joint un troisième pompeusement baptisé : 


"LE COIN des U, PRO" 


Vous remarquerez que ma démarche relève donc, 
d'une part d'un esprit plus "soft" que "hard" et 
que, d'autre part je suis plus tourné vers la 
pratique que vers la théorie. 


Bien entendu je ne souhaite pas envahir les 
colonnes du journal et je ne serais pas vexé si 


LA REVUE DE PRESSE 
«LES JOURNAUX (1'OI/OP etc...) 
.LES LIVRES 


LES HARDWARES ("sur le marché") 
.LES NOUVEATES "HP" 
.LES MATERIELS COMPATIBLES HP 
«LES REALISATIONS DES MEMBRES 
.LES AUTRES MATERIELS 


-LES APPLICATIONS LIEES A UN ACCESSOIRES 


. IMPRIMANTES 
. LECTEURS (de cartes, de code barre), CASSETTE 
«INTERFACES (vidéo, HP-IL, etc...) 


MODULES spécifiques (TIME) ou d'application 
-DES ARTICLES THEORIQUES 
LA PROGRAMMATION 
-"TIPS & ROUTINES" 
“DES LOGICIELS D'INTERET GENERAL 
-DES PROGRAMMES DE JEUX 
-DES PROGICIELS (plan de classement en annexe) 
-les "PETITES ANNONCES" (achats/ventes de matériels) 


et pourquoi pas des rubriques inspirées du PFR£Æ 
Journal telles que 


— NOP 
-FEEDBACK 
—TOULROM etc... 

Tout ceci,non pour répondre à ma manie de la 
classification, mais pour affirmer le rôle du PPCT 
Journal qui doit non seulement être un outil 
de contact, d'information, de formaticn mais 
également un ouvrage de référence, frcile à 
consulter, et surtout un support proritionnel 
destiné à "vendre" le club aussi bis auprès 
des amateurs francophones, qu'auprès des professi — 


onnels (enseignants, professions libérales, finan 
ciers, chercheurs etc...) 


Espérant que mes propositions retiendront votre 
attention je vous adresse une HPM (Haute Poignée 
de Mains) 


PJ "Le COIN DES "U" PRO" PETITE ANNO'ICE 
Projet de Plan de Classement des P-ogrammes 


XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXKI IKXXXXXAXXXAX 
VENTE DE MATERIEL : 3 x 82106A 

CAUSE ACHAT QUAD MEMORY je vends 3 modules memoires 
our HP 41C ref 82106A à F-100-1'unié 

Envoi à reception du chèque ou contre remboursement 
(frais à charge du destinataire dans ce cas) 
FURGEROT 68 ,rue Gabriel Péri 92120 MONTROUGE PPCT156 
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXKXMEXX LXXXXXAXXNXMXX 
PROJET DE PLAN DE CLASSEMENT DES PROGRAMMES 


-GESTION: budgets, ventes, production etc... fichiérs 


-FINANCES+banques :assurances 
Comptabilité, épargne, taux actuariels 
Analyse financière, Investissements, prêts/leasin 
Taxes/impôts 


- INDUSTRIE 
AGRICULTURE 

SCIENCES 

MEDECINE /SANTE 

-MATHS, PROBABILITES/STATISTIQUES 
-NAVIGATION (Air, Terre, Mer) 
-MESURE DU TEMPS 


tous mes articles ne sont pas publiés tout de suite. 


Ceci étant, sans m'immiscer dans la gestion, 
je pense qu'il est souhaitable de structurer 
clairement le journal en reprenant; toujours à la 
même place, les rubriques essentielles annoncées 
par un titre voyant, à savoir 


-L'EDITORIAL 


LA VIE DES CLUBS 
.PPCT 
les nouveaus adhérents 
“disponible à Toulouse" 
le courrier des adhérents ("réactions") 


-DIVERS 


Qu'en pensez vous? Merci d'adresser vos 
critiques constructives à 
FURGEROT 68, rue G. PERI 92120 MONTROUGE (PPCT 156) 


L'édition d'un annuaire des adhérents fait 


partie des objectifs de PPC et de PPC-T, mais des contingence 
bassement matérielles (pas le temps!!!!) ont fait constamment 
remettre à plustard la réalisation de ce projet. Par contre 
j'avais proposé dans un ancien numéro que se proposent des 


.LES AUTRES CLUES PPC PPC-T Hoë 
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responsables" par sujets, chargés d'animer une rubrique (comme 
Microscene de Craig Pearce ou Viva 25, rubriques de PPC US). 
Jusqu'à présent les volontaires ne se sont pas empressés, 


Nous avons par exemple plusieurs officiers de marine et plusieurs 
pilotes d'avion sur les 300 membres du Club. Ils ont peut- 
être des choses à se dire. Le Journal est là pour ça. A vous 


Au fait j'ai toujours à vendre un exemplaire du fameux livre 
de Baumgartner (70 F franco)! 


NOP: correction des erreurs des précédents existe quand des 
erreurs me sont signalées....C'est le cas cette fois-ci. 


Feedback s'appelle "Réaction" dans PPC-T et 
numéro. 


figure à chaque 


Le classement que vous demandez pour 
L'éditorial, les clubs, les journaux, sont en page 2; suivent 
4 grandes rubriques: Programmes, en nombre insuffisant pour 
être subdivisés, Applications concernant les matériels, les 
astuces de programmation, les cours destinés aux débutants 
(trés recherchés), Réactions qui contient le courrier et les 
remarques concerant Île journal ou le club. Il est presque 
impossible de subdiviser davantage, sauf à créer une nouvelle 
rubrique, comme NOMAS (Not manufacturer Supported: sans garantie 
du fabriquant) pour le microcode, si la matière le rend possible. 
En fait quand vous écrivez au club, vous déversez tout votre 
Savoir dans votre machine à écrire et il n'est pas toujours 
facile de trier!!! 


LE COIN DES L PRO 


(LE COIN DES Utilisateurs PROfessionnels de la HP-41) 


le jou rnal existe bien: 


Jean FURGEROT PPC8435-PPCT156 4O0ans, exploitant de 
Banque, Trésorier d'un LEP de Photographie, prof au 
CFPB 


utilise les programmes personnels suivants 


(quad) 


- nominaux & actuariels sur placements à terme 
(bons & comptes - intérêts pré & postcomptés) 


-PICOVISICALC: toutes opérations sur un tableau de 
10x12 max, y compris libellés (configuration: Quad 
+X fonctions + cassette) 


-Barême IRPP 





-Dépouillement de Bilans 


-Analyse des encaisses (quad) 


-Portefeuille Titres (X fonctions) 
etc... 
ECHANGE CES PROGRAMMES contre 


programmes &/ou algorithmes &/ou organigrammes 
traitant des sujets suivants: 


-prêts à remboursement progressif (de 2 à n palier) 


-calcul complet de l'IRPP 
-tenue de comptabilité 


-tout programmes utilisables dans ses activités 


professionnelles 


RECHERCHE POUR DES ECHANGES DE VUE UTILISATEURS 


-de l'excellent ouvrage de Mrs BAUMGARTNER & PETITGAND 
"PICO-INFORMATIQUE ET GESTION. D'ENTREPRISE" 
(les Editions d'Organisation PARIS 1981) 


-du module FINANCIAL 7 


“Merci de me joindre à mon domicile 1-6556710 
ou de m'écrire 68, rue G Péri 92120 MONTROUGE 


REXXXXXXXXXXXXXXXKXX IIKIIHNXNXXXXXXXXXXXXXXXXKXXXXKXKX 
APPEL AUX UTILISATEURS "PROFESSIONNELS DE LA HP41 


SERRES SIMS IIS SSSESS=S 


En adhérant au PPC, puis au PPCT, je pensais 
pouvoir joindre des utilisateurs de HP41 ayant les 
mêmes préoccupations principales que moi: mise au 
point, échages d'idées/programmes utilisables dans 
ma profession, 


Hélas, j'attends toujours l'édition de l'an- 
nuaire du PPC et les listes d'adhérents du PPCT 
n'indiquent ni les professions, ni les sujets 
d'intérêt. 

AUSSi pensant ne pas être le seul dans cette 
situation, je propose l'ouverture d'une rubrique 


baptisée"le coin des utisateurs professionnels" Mr 


ou "COIN DES FU" PRC'; rubrique largement ouverte 
sur l'extérieur mais qui, dans un premier temps, 
contiendrait la liste, par profession et/ou sujets 
d'intérêt des membres du PPC-T avec indication des 


n° de tel (domicile et/ou travail), 


Bien entendu 
1/1a mise à jour de cet annuaire serait publié 
dans chaque numéro du Journal 
2/ceux qui désireraient ne pas y figurer so#t 
dès à présent invités à le faire savoir au Club 


Ensuite cette rubrique pourrait traiter 
les thèmes suivants: 
Programmes personnels utilisés par les membres 
-recherches de programmes 
-citations ou analyses d'articles ou d'ouvrages 


traitant de sujets professionnels 


propositions commerciales 
.de séminaires, Stages, conférences etc... 
de vente de programmes (y compris ceux 
proposés par HP à travers CORVALIS où Genève ) 


-banc d'essai 
.programmes 
.Stages etc.., 


Les beaux discours ne valent pas l'action 
aussi je vous montre l'exemple en me poussant 
à l'eau.en espérant bien ne pas être le seul à 
ramer. 


Jean FURGEROT 68, rue Gabriel Péri 92120 MONTROUGE 
tel dom 655 67 10 précédé du préfixe:1 pour les 
appels de la province où de l'étranger (il est 
permis de révêr non???) 


XX X K K KE SK À XX 
XÉXKXKEEEXXE XXE EX 


T178 Bondy, le 16.03.83 
Bien cher Jean-Daniel, 

Un grand merci pour tout ce que tu m'as 
envoyé. J'ai commandé à Didier JEHL un lecteur 
d'EPROM et je vais donc commander TR-1D 
(ToulROM). Je vais également commander PPC ROM. 

Tu trouveras ci-joint copie du "papier" 
que j'ai envoyé à Philippe GUEZ (P1) car je 
suis adhérent (récent) à PPC-PC. Tu comprendras 
que la proximité de mon domicile a été la 
raison principale de ma décision et, comme l'a 
écrit Jacques VAUCELLE : &certains HPistes 
enragés s'abonneront probablement aux deux 
revues,....>> (sic). 

Puisque tu nous demandes notre avis sur la 
présentation du Journal, j'indique que le format 
d'écriture est particulièrement pénible à lire 
pour ceux qui n'ont plus leds yeux de 20 ans et 
qu'il serait peut-être possible de gagner de la 
place en éliminant la publication des lettres 
ou parties de lettres ne présentant aucun intérêt 
telles les demandes de matériel ou d'adhésion, 
Autrement dit, suppression de tout ce qui ne 
peut être d'aucune utilité pour les lecteurs. 
Je sens que cette disposition pourrait s'appli- 
quer souvent à mes bavardages...,... 

La publication ou plutôt la distribution 
de PRGM en CB aurait facilité la tâche de 
Damien DEBRIL avec qui je correspond réculière- 


Manti-CB" 1! C'est dommage pour 


ment. Tu sembles 


les heureux possesseurs de lecteur.,.... 


Je t'enverrai un papier sur W! dès que mes 


# ‘+ a 
recherches seront complétees,... "7, ? ( 


#7 


Amicalement et respectueusement, 7 


Recu le 21 avril, suite à la grève des postes.... 
NGE 
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LBL_"délocalisés" et BG 


J'avais écrit précédemment qu'il était possible 
d'obtenir des LBL, GTO & XEQ délocalisés avec le 
BG. La procédure que j'avais trouvée pour LBL "d" 
était assez longue mais JDD (°) m'a gentiment 
indiqué le moyen d'obtenir le même résultat d'une 
façon beaucoup plus Simple : 


PRGM LBL "T'" #1 LBL MT 
LBL "T" #2 LBL "T 
X=y? x=y? Ph X=Y? 
GTO .##1 BG SST #3 LBL ## 
SST pk "TT 
GTO .#93 BG SST #5 CHS 
En + #5 + 

X)#? #6 xX\p? 
PACK BST #5 + 

<— BST #3 LBL #f 
BG — SST æ— SST #3 "à 
GTO .##1 PACK BG “#— SST — fi LBL "T 
SST #2 LBL "dä 


NS 


Ne pas faire BST à la place de GTO .##93 car 
nous serions parachuté dans les REG d'ASN, 

CHS apparu au Pas #5 a le même code que T 

+ est un code queconque destiné à prendre la 
place d'1 octet et qui sera ensuite effacé pour 
créer le NUL (octet indispensable pour stocker la 
“"distance"). 

(°) Je tiens ici à remercier Jean-Daniel Dodin 
(T1) pour son aide efficace et éclairée sans la- 
quelle les lignes précédentes n'auraient pas pu 
être écrites. PPC-T 77, rue du Cagire 31100 
TOULOUSE . (je suis T178) 


Passons maintenant aux GTO "“d'" : 


PRGM LBL "R" #1 LBL "R 
GTO "R" #2 GTO "R 
BST BG p2 NAT 4 
SST f3 "R 

— "d" #3 “d 


GTO .##1 BG €— SST <— SST #2 GTO "4 
Vous avez remarqué que le signe É qui apparait 


dans la chaîne issue du BG correspond au code 29 
qui est GTO ÿ vous pouvez obtenir XEQ "“d'" en 
remplaçant GTO "R" par XEQ "R" 

Comme je vous le disais, l'utilisation du BG 
est un "sport" dont l'entraînement permet de 
comprendre la constitution des fonctions. 

Je dois préciser que mes "découvertes" n'ont 


été possibles que grâce à la lecture attentive du 


s 


livre "AU FOND" de JDD. Donc: un grand merci à JDD ! 


à bientôt, peut-être R,.S. 

(copie du présent "papier!" envoyée à JDD) 
T178 Coup d'oeil sur Ww" 

La "fonction" £ae2 ASN/"KA" avec les codes 
1,31 permet d'obtenir bien des "choses", 

Je me contenterais de donner quelques 
exemples. 

fae2 étant ASN à la touche 5 (wW) : 

Mode CALcul 


XEQ "a" affichage: NONEXISTENT 
PRGM USER W USER pp W'!' a 

CAL XEQ EMDIR DIR EMPTY 
PRGM USER W USER pp W"' EMDIR 
CAL XEQ DIR etc.... pp (DIR...) 


La manip avec EMDIR suppose que le XF se 
trouve placé dans un port et pour DIR, l'inter- 
face boucle "IL", Dans ce dernier cas, le 
lecteur de K7 peut rester sur OFF, 

Vous pourrez découvrir bien d'autres utili- 
sations de cette "fonction" bizarre, vous avez 
dit bizarrel... et, comme je crois vous l'avoir 
dit précédemment, ce code 531 (en DEC) est 
INDISPENSABLE pour introduire en ALPHA (puis 
en X) la chaîne adéquate permettant de mani- 
puler les 4k premiers drapeaux avec STOFLAG. 

Qui a dit qu'il n'y avait plus rien à 
découvrir ? Je vous assure que j'ai découvert 
tout cela sans aucune aide quelconque mais je 
pense que d'autres l'auront fait avant moi. 

Je vous laisse le plaisir d'exploiter ce 
sauteur d'octets". 

Bon entraînement, R.S. 


pp indique le N° du PAS correspondant. 


mn nn 


nn € + 0 6 + 


Mr PELANNE J.F. 
60 rue Saint-Flacide 
75006 — FARIS 
T-191 
Cher Monsieur DCDIN 


Gd mère HP affirme que l'on ne peut exécuter un prgem 
directement à partir de la mémoire étendue mais moi je 
dis , on le peut, et ce qui suit le prouve 


Procéder très précisément comme suit 


1/ Mémoire étendue vide ( XF ss XxM ) 

27 Faire le SIZE correspondant au prgm que l'on va 
enregistrer. Appelons le XX ( pour que celui-ci soit 
exécutable). 

3/ Remplir la mémoire étendue avec un prgm de 100 R par 
ex. avec SAVEP puis l'effacer de la mémoire princi- 
pale. 

4/ Remplir le mémoire principale de façon qu'il soit 
impossible de copier le prgm de 100 R par GETSUB. 

5/ Disposer du XROM 05,03 assigné à une touche ( LN ou 
autre de 

6/ Une fois que les conditions 1/ à 4/ ont été remplies 
faire XROM 05,03 en mode calcul. 

7/ Passer en mode prem,faire SST jusqu'a voir £BL’XX 
( notre prgm ) label du prgm existant en mémoire 
étendue ( soyez patient surtout si beaucoup de tou- 
ches du clavier ont été assignées à des fonctions ou 
des prgms VF Attention n'appuyez pas sur une touche 
autre que SST ou BST sinon MEMORY LOST, nous sommes 
après la zone d'assignation, certainement dans la 
zone mémoire du X Ftes. 

8/ Passer en mode calcul et faites XEQ alpha XX alpha 
affichage de NONEXISTENT évidemment puisque celui-ci 
n'est pas dans la mémoire principale. 

9/ Repassons en mode prgm et faisons SST jusqu'au END 
du prgm puis à nouveau SST, la numérotation des 
lignes à changer, nous sommes uesormais horse de la 
table assignations ( cette phase 9/ n'est pas indis- 
pensable ). 


10/ Se placer sur LBL'XX puis repassons en mode calcul 


et faisons R/S » une chaine de caractères synthéti- 
ques peut apparaitre, surtout ne rien toucher sur- 
tout pas R/S , quelques secondes plus tard, le prgm 
s'exécute normalement. 

Et voilà on peut exécuter un prgm placé en MEM 
étendue facilement et directement sans avoir à le 
copier en MEM principale contrairement à ce 
qu'affirme Gd mère HF. 


Zn d'A ab À an té de Jaures & END cœusfendenh 
au XROMDS O3, 


Cher Monsieur, 


J'ai fait de nouvelles découvertes depuis ma dernière 
lettre, en complément de ce que j'ai dit précédemment. 
Un programme privatisé par WPRV se trouvant en MEM 
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principale peut être lu muis il faut le copier en ME 

étendue puis procéder comme plus haut, en faisant en MANS Touré MT ot avec “Jen t' nt avec cette 
mode user calcul XROM 05,03 ou XECM £8,63 puis en mode fine: 59 % a 9 a disrani 5% | 4 
prem SST,SST..... jusqu'au label Gù rem et on visualise | | : 
le prgm soit disant privatisé. On peut copier X prgm 

en MEM étendue et les exécuter mais il faut sauter les Tout se “ose ionc & me si la ‘fectiait ne 
différents END des prgms en faisant GTO.nnn. 
Par ex: 

Nous avons 2 prgms en MEh éteridue et je veux exécuter 

le second. J'esrèrs que Vous viendrez vite à notre aide car 


> 2 et reste sn t 


rSration tanale eur y at y 


1/ Mode calcul user XROM 05,03. Je ne cris ras “tre Le seul à avoir des rroblè- 

2/ Mode prem SET,OUT....jusqu'au label du ler prgm, 
celui-ci #1 ‘rcuvant par ex: de la ligne 161 à 40% 
( position du END au ler prem ). 

5/ Faire GTO.404 puis SST,SST....jusqu'au label du 2em 
prgm puis repasser en mode calcul et R/S ( procéäu- 


res avec cette fonction (air connu).D'ici là: 


re expliquée dans ma lettre précédente) et voilà Heureuse Programmation 
comment exécuter n prems se trouvant en MEM étendue 
même si ceux ci sont protégés. Mais pour exécuter . 


plus rapidement cette procédure, on peut repérer la 
position du label et du END de chaque prgm ainsi s'il 
on veut exécuter le 3 ème prgem ( par ex: ler prgm ligne 
159 à 265, 2ème prgem 277 à 336 et 3ème prem 349 à 622). 
11 suffit de faire : 

1/ XROM 05,03 en mode calcul user. 

2/ Passer en prgm et GTO.349 


3/ Repasser en mode calcul et R/S. Nolin Fatrice T263 


Et voilà c'est aussi simple que cela. 


Hapey crosses KO KOK AK RON EX À à 


T 191 ATTENTION 
k EX XX 
MONO EXO ONE KO À À À I1 semblerait qu'une nouvelle génération de 41 
KOHROK HE OK EN OK OR OX OX 6 KO À NOK KO EE K x vienne de voir le jour. Ma machine, fabriquée en 
décembre 1983 (2250S41926) possède des différences 
Nolin Fatrice T263 avec les séries précédentes. 


-Pour celles qui sont intéressantes: 
Caractères de l'ecran encore plus grands et plus 
57 160 FLORAIGE lisibles que les séries précédentes ayant déja 
À PROPOS DE STO 12 le clavier "plat": différence d'environ 1mm! Un 

vrai régal pour les yeux, 


68 à2ue de Metz 


- Celle qui est très gênante: 

Cher Monsieur DODIN, Cette nouvelle machine supporte malles "TONEs" 
synthétiques, Après en avoir exécuté une, la 
machine émet un grésillement presque inaudible 
(coilez votre oreille sous l'emplacement de 1a 
batterie) qui ne s'arrete pas, même la machine 


Avant d'aborder le sujet de votre lettre une éteinte. Pour le supprimer, faire une "TONE" 
“ ais nt dns i normale. Ceci semble dû à une fuite de courant 
SAAPAUS S'AMpaSs: La posté p'e8t pas d'une pas dans le "beeper'", qui semble confirmée par 
ridite avouglante car je n'ai recu votre cour- l'article de Marc Chiffoleau dans PPCT N°5P31 


Je ne sais pas quelles conséquences peuvent 
entrainer un tel état de fait. Je vous conseille 
H“ars, donc, après une série de "TONES" synthétiques, d'en 
placer une normale pour remettre les choses en pla- 
ce, car cela ne peut qu'endomager la machine ou les 
utiliser le code 60 (2C en Hexa).Pour le prefixe batteries, Un spécialiste pourait-il nous éclairer 
sur la question (Mr Vaucelles, me lisez-vous ?) 


rier que ce matin alors qu'il est daté du 25 


Pour assigner sto 12 c'est simple il n'y a qu'a 


on utilise l'habituel bouche-trou LBL 03, 
nas : PC = bi 
En utilisant le KA version PPC-T (bien nlus econo Didier Cayrac, T119 
mique que celui de #.C. Wickes) on entrera donc à 
l'apparition des "???": 4 enter 60 enter 11 (ou 


un autre code de touche)et R/S5. 





A propos de cette fonction essayez de l'assigner 


à une touche shiftée vuis executez-la: l'indica- 

teur "SHIFT" reste allumé à l'affichay- et on SUGGESTION aux auteurs, 
obtient un NNN. Je propose à ceux qui veulent publier dans le 
journal de dissocier leur lettre de leur(s) 
article(s), En effet, je pense que PPC-T serait 
exécuter la fonction shiftée car la H-P s'obsti- ainsi beaucoup plus facile et agréable à lire. 
Une partie (réduite) du journal serait consacrée 
aux lettres les plus intéressantes (Feedback) 
cependant lors de l'entrée d'une ligne de prem et une autre aux articles et programmes. 

Qu'en pensez-vous ? 


En mode FRG“ il est à nremière vur impossible de 


ne à afficher "OUT OF RANGE'".Une suele excertion 


numérique où la machine na fait rien en mode FRG“ 
- e ! ‘ n j £ : 

lorsqu'on rerasse en mode calcul le registre X a Didier Cayrac, T 4143 

été effacé (coucou surrriset) 


Le nr£gm micro-code ie cette finction doit ètre 


“assionnant à décortiquer comment en déterminer EE EE ET 
l'enrlacement à nartir de la fonction?Est-ce Cher jean-"aniel 

possible? 

Un dernier mot nour vous parler des effets de ce- J e voudrais tout d'as-rû parler des plaï- 
te fonct:on sur la rile si vous ne l'avez ras en- tages, c'es; un problème devamt lequel toutes 
core fait personne imterressée par le synthétiqu® se 
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trouve confronté, J'ei pu remarquer que la 
destruction d'une chaîne de caractères nulle 
dans les registres i'assignations provoquent 
souvent un tel plantase, Le remède est alors 
simple: provoquer um MEMOXY LOST sans éteind 
re la 41! pour celà, soit on stocke une valeur 
bidon dans 1 registre d'état Cc? soit on se 
place dans les registres d'assignations et in 
troduit des instructäons quelcorques ce qui a 
mènera inévitablement au MEMORY LOST recherché 


deuxième sujet de ma lettre: j'ai lu 
dans PICGT ou dans l'OI (?) la lettre d'une 
personme se plaïgnant de n'avoir pas d'ouvra 
ges sérieux sur l'astrinomie de position, 
Je citerai donc un livre qui traite intelligem- 
ment du sujet: 
CAICUL ASTRONOMIQUE POUR AMATEURS 
adapté à l'emploi d'un calculateur ou d'un 
micro-ordinateur 
AUTEUR : 8. Houiges 
édité chez MASSON 
Pour éclaicir les idées, en voiçi le plan: 


1è re PARTIES 

Rappel de notions élémentaires d'astronomie 
1..Les mouvements dans le système solaire 
2..S5ystèmes de coordonnées 
Se-sle temps 

2ème PARTIE : 

le calcul des positèons planétaires 
4..Calcul des coordonnées écliptiques et 

héliocentriques d'ume planète 

5..Coordomées géocentriques 
6..Constantes planétaires 
TesMouvements de la LUNE 
8..Amélioration de la précision 

9..Coordonnées apparentes 
10..-Satellites de JUPTITER et deSATURNE 
11..0ycles 
12..Déterminations de l'orbite d'une comè te 
15..Les étèiles doubles 


sème PARTIE : 

Les relations ciel-terre 
14...Temps sidéral 
15...Calcoul des coordonnées locales 
16...'ever et coucher des asters 
17.17€ triangle parallact ques 
18...Visibilité d'un astre 
10...0alcul d'un ‘adran solaire plan 
29...Coordonnées héliographiques 

4ème PARTIE: 

la programmation sur calculatrice de poche 


ANNEXE 1: Exemple de programmes 
-HP 67: calcul de N 
410 : coordonnées des planètes 
-TI 59: LL " F 
—41C : lever et coucher du soleil 
-TI 59: étoiles doubles 
BASIC: éphémerides 


ANNEXE ec: Note sur fonctions trigo inverses 


contraintes apportées var certains 
mic oordinateurs 


Trosième sujet: Ia prozrammation des 
#hels. contenant des ca 

ractères "synthétiques" ou non. 

il suffit d'entrer la séquence d'instructions 

RCL IND b4 

SIN 

Chaine de n+# chr 


le Ter caractèrex de cette chaine est le 


suivantes: 


caractère nul codé 00, Compactez ensuite la m 
memoire (PACK) et BG sur l'instruction précéd 
ant RCL IND 64, détrüisez la chaine "7?" Æ@n 
qui en résulte et 88 pour voir le label 


désiré. vous pouvez ainsi avoir des labels 
jusqu'à 14 caractères, Cependant seuls ceux de 


moins de 7 caractères peuvent faire l'objet d' 
un branchement par GTO ou XHQ. si vous désirez 
assigner un tel LBL, le 1er caractèref de la 
chaîne synthétique devra correspondre au code 
de la touche à laquelle vous désirez assigner 
le LBL(chafne de n+ 1 caractères mentiormée 
précédemment.).ensuite, soit vous armeæ Le bit 
correspondant à cette touche dans le registre 
e ou +(ce que je déconseille car c'est fastidi 
eux) soit vous stockez ledit programme sur k7 
ou sur carte magnétique en prenant soin d'être 
en mode USER, Lorsque vous chargerez ce progra 
mme en mode USER, il sera assigné à la touche 
désiré, 
un exemple clarifiera les choses (je l'espère) 
soit à creer puis à assigner LBIMABCOEFGs" à la 
touche T+,. 
entrez la séquence suivante: 

61 sin 

02 RCT: IMD 64 

03 SIN 

04 “FABCDEPG:+ (F9 Of 41 42 43 44 45 46 

47 34) 

le caractère 01 correspond au code de la touche 
+. Ensuite BG sur Ofsin , 557 une fois pour 
voir apparaître LBTL "ABCDEFG:", Enregistrez ensuite 
ce programme en prenant soir d'armer USER, 
Lorsque vous lirez cette carte; USER armé; le 
programme sera assigné à la touche Z4, 
Je crois que l'intérêt de ceci est surtout ludique 
encore que certains y trouverons peut-être des 
applications. 


j'ajouterai rituellement: 
Happy programming ou pour les 


francophones L 
JOYEUSE PROGRAMMATION“ 


Jean-Claude CATY 9412 T168 


Xe KO KE OK OK OK GK HE KE K % % 
# 4% KE 2% À À 


Derniére heure : H-P annonce “une Surpriw dous Pas 
m atamns pour Aout .. eu FRANS œusir ? ? 
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PROGRAMMATHE QUE 


Depuis nuelrue remrs Î'eccaie d'orianiser ma collection de 
rocrammes. Cependant je n'arrive nat Ÿ saticfaire toutes mec 
‘Xicences sur la forme que “evrait avoir cette futire Drooram- 

-rathèque. Pour bien faire il faudrait « 

- être sur de la fiabilité de conservation des programmes 

— Pouvoir retrouver celui cue l'on recherche facilerent 

- être ai<ément transportable et stockable 

- chaque programme doit être exrlicué clairement. Un néorhite 
doit pouvoir le mettre en oeuvre. 

- être accessikle \ d'autres qu'au créateur 

Si je n'ai rien oublié, on peut commencer à transformer ces 
désirs en réalités, Alors pour être sur de retrouver un program- 
-me, il ne suffira pas de l'enregistrer sur cartes, cassettes ou 
codes barres, car ces systèmes ne sont pas assez fiables pour 
Btre uniques. 11 faudr: donc conserver une liste de chaque pro- 
-gramme. Cependant, elles ne seront consultées que très rarement 
et elles impliquent un volume important et donc une gène. Alors 
n devra séparer notre programmathèque en deux parties : la pre- 
-mière constituée de cartes magnétiques, de codes barres ou de 
cCaStettes, et la seconde composée des listes de tous les program 
-mes. La relation entre ces deux formes de stockage se fera par 
l'intermédiaire de numéros qui correspondront chacun * un pros 
-grämme donné. Cn pourra mème conserver, par écrit, les diffé 
rentes versions d'ün programne quand, par sirplicité et par Éco- 
-nomie, on n'en gardera qu'une utilisable directement. 

“ais maintenant, comment retrouver le programme désiré ? Eh 
bien, le mieux est encore de stocker tous les programmes d'une 
manière donnée, de référence, et de faire des fichiers faisant 
la liaison entre les différents classements. En effet, on peut 
classer : par ordre chronologique d'enregistrement, par ordre 
ilphabètique, par auteurs, par taille, par sujet, par fréquence 
l'utilisation, et que sais-ie encore...? Par exemple, on nourrait 
-tocker, en référence, par ordre chronologique d'enregistrement. 
-e qui impliquerait un couple : numéro d'arrivée-programme. Et 
créer, parallèlement, autant de fichiers de correspondance que 
l'on souhaiterait de classements, Ils seraient composés de cou- 
-ples : forme de classement particulier-numéro d'arrivée. 

“ais on pourrait encore améliorer le système en dédoublant le 
«tockage des quelques programmes utilisés quasi-quotidiennement. 
cette petite annexe, trop petite pour ètre classée à son tour, 
cerait contenue dans la housse de la H.P.. Ainsi on pourrait 
amener Sa machine en voyage avec la première partie de sa pro- 
-grammathèque, et même en simple déplacement avec son annexe. En 
effet, pour ètre facilement transportable, il faut bien admettre 
que l'utilisation du lecteur de cartes s'impose, au moins pour 
le Stockage de l'annexe de la programmathèque. 

Pour qu'un programme soit utilisable par un néophite, il faut 
qu'un mode d'emploi soit noté quelque part. Je pense que le mieux 
serait de l'écrire sur une fiche signalétique qui serait attri- 
-buée à chaque programme de la première partie. Ces fiches serai 
-ent placées à proximité du programme stocké, dans le cas d'uti- 
-lisation des cartes et des codes barres. Ou bien, elles seraient 
classées en carnet, dans le cas de l'utilisation des cassettes. 


Voici un exemple de fiche signalétique : 


Nom : 
Sous-programmes / Extensions nécéssaires/ 
Code/ Labels et affectations/ 
Explications/ 


Où, après Nom on écrit : le nom du programme et son objet. 

5, sous Sous-programmes/ on note les différents programmes 
écéssaires à son utilisation. 

M, sous Extensions nécéssaires/ on inscrit parmi 4R (Quad Ra: \ 
, K7 (lecteur de cassettes), LC (lecteur de cartes), MT (module 

emps), ME (module d'extension),IL (interface IL ), IM (impri- 
-rante),...les accéssoires nécéssaires à son fonctionnement, 

M, sous Code/ on écrit le code correspondant aux différents 

ombres caractéristiques du procrarme : 

- #9990 pour le nombre d'Octets programmes utilisés 

- SSP pour le nombre de Pistes de cartes magnétiques occupées 
— LDPM pour le nombre de registres Mémoires nécéssairecs 

- SPDF pour le nombre de registres de Fichiers nécéssaires 

Exemple : 25903P19M2SF 

Et où, sous Labels et affectations/ on note les affectations 
es labels, exemple : £H23, CH24, TH25, 

Et enfin où sous Explications/ il faut placer le plus dur : le 
ode d'utilisation, l'ohiet précis et les performances du OTOG— 
-Tämme « 

£t pour qe tout ce travail scit publiable ou simplement util'- 
-Sable par des amis, il faudrait qu'il soit écrit lisiblement où 
mieux, tané à la machine. De mème, une notice d'utilisation de 
la orogrammathèque pourrait être utile. Elle contiendrait : le 
yre du classement de référence et des autres, un schéma expli- 


+, 


-Guant Île fonctionnement de tonne 14 pere ren, I'explics 


-tion du nuréro de code et tous lee cnreitie ro VIS inrerez 
itile de donner aux néonhites, 
Ah ! J'oubliais ! Il ne serait rlus reccin alvre de noter sur 


le£ cäartes ou cassettes les nors dec DYrcarétres contenus, mais 
Simplement leur référence dans le classement de référence. 

Mais alors, me direz vous : pourGuoi n'arrive-je pas à eonsti 
-tuer cette programmathèque dont je rêve si précisément ? Eh bi 
Simplement parce que je devrais travailler sur plus de 18f pro 
grammes, et aussi parce que je ne nossède pas d'imprimante. Mi 
c'est petit à petit que l'oiseau fait son nid, alors je rattran. 
lentement mon retard pour atteindre mon but. 

En fait, cet article a surtout été écrit pour les débutants 
qui ont tendance (comme moi) à accumuler toutes sortes de pres 
-grames. Attention ! Faites le tri et le classement au fur et 
à mesure, sinon vous glisserez doucement vers le même merdier 
duquel j'essaie de sortir, 


GEORGELIN Daniel T 57 


* *k * * * 


4 +++ *X * + 
EEE X 


JT Pude) Ty. 


MODE D?EMRLOI D'ASC 
APRES AVOIR CREE UN FICHIER AVEC CRFLAS FAIRE XEQ ASC, ENTRER LES 
CARACTERES . 
S'IL Y A PLUS DE 24 CAR. APRES LE BEEP SORTEZ DU MODE ALPHA APPUYEZ 
SUR G: POUR CREER UN ARTICLE , F: POUR RAJOUTER DES CARACTERES , 
H: POUR RETABLIR TOUS LES FLAGS . 
S'IL Y À MOINS DE 24 C ON PEUT EMPLOYER + 6: POUR CREER UN ARTICLE , 
2 POUR AJOUTER DES CHAINES MAIS ON NE VERRA PAS LA FIN DE LA CHAINE 
N COUR . 


POUR ECRIRE CE MODE D'EMALOI J'AI UTILISE : 

1 IMPRIMANTE RAPIDE HP-JV 8228 À + HPu1 CU 
LE PREN ASC (GIL/PIVIDAL) 

LE PREN ED (POUGEON) POUR CORRIGER LES ERMELRS . 
LE PREN HLP (VALCELLE) FOUR IPRIMER 


22:06 05/04 


GILBL "ASC" 
= = = 
== es 
— ==. 22:07 05/04 
em O1LBL "ASC" 
RER @2 CLA 
== u “(h8,4)128, 0 
M == = EN Eu — 03 "O FR 4 >) 
5 = === @4 REL 
= Sn 
RER @5 STO L 
. = === 06 RCL d 
= mn = 67 STO Z 
à Vs @8 CLA 
in = === = 
x Um== == O9LBL @a 
Lj em = s 
> (mm === — 18 ASHF 
m = === = 11 ASHF 
Ne === 12 ASHF 
u = = eS= == 13 RCL L 
KE ====== 14 XO d 
= = Se =—=— 15 AVIEW 
LUE = s 16 CLA 
us ES LE 
NE ===> 17 STOP 
TT EE=S==-. 18LBL F 
da === 19 APRCHR 
ET Üm ===. 28 GTO à@à 
a ms 21LBL G 
a === —- £2 APPREC 
Lu = == 23 GTO @ù 
0 = === 24LBL H 
0 (EE SsS==S- 25 X0 Z 
Li LE Ss ===: 26 STO d 
SIES=S==== 2e 
S 1 = === 1 
+ LE SS=E=s= sie 
 ISSE=S=== “‘ 
"ISÉss=s=z 
r LE = === = 
SIS=SEs=E=E=- 
5 [= === == 
n 0 =ÆSSE=— 
LE ====== 
so 
ao 
ÿ OU MO + OO Fr 
S 2  % 2% 2 2 2 2Z 
in Q OO OQ Q OO © OO 
s EEE EE € 
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Article écrit initialement pour "l'Ordinateur de Poche (qui l'a 








refusé!) c'est pourquoi il reprend tout au début. Ce n'est 
sans doute pas inutile. 
J-D Dodin 
HP-15C 
Où nous allons relever les jupes de cette demoiselle! 
Une fois n'est pas coutume, c'est la maman qui donne 
le mode d'emploi pour déboutonner sa fille! les séducteurs 
entreprenants auront surement été intrigués par une 


note à la page 263 de la notice française 
de la HP 15C: dans le chapitre consacré à la "vérification 
du fonctionnement", le $1 précise: "Si le calculateur ne répond 
pas aux pressions de touches... appuyez sur y°x et ON simulta- 
nément, puis relachez les. Ceci modifie le contenu du registre 
X, effacez donc ce dernier ensuite." 

Et, se dit notre séducteur, si je ne l'efface pas ? 

Avant de faire Ia première expérience, précisons bien 
les conditions. Il faut d'abord éteindre la HP, puis presser 
simultanément sur les touches ON et y°x (j'écris ainsi y puis- 
sance x, touche 14), puis les relacher DANS N'IMPORTE QUEL 
ORDRE. La HP s'allume avec à l'affichage... ne soyez pas trop 
préssé! 

Cette séquence de touches, nous aurons à la répéter souvent, 


donnons lui donc un nom: D22. D pour Demoiselle, 22 v'la la 
maman | 

Nous pouvons maïntenant commencer à lever le voile 
Tapez Île chiffre 7,777777777 E77, donc 7, une virgule (ou 
un point, si vous préférez la méthode US), neuf autres 7, 


pressez la touche EEX puis encore deux fois 7, vous voyez: 
7,777777 77. OK ? 
Effectuez maintenant la séquence D22 décrite ci-dessus.avez- 
vous pensé à éteindre d'abord la machine ? vous devez voir: 
0,000000000 si vous êtes en FIX (quelque soit le n°) 
1,422422-56 si vous êtes en SCI 9. Curieux ??? 
Faîtes maintenant f PREFIX pour voir la mantisse... Oh 
surprise! vous voyez Pol “olPPPP. P doit être l'initiale 
de"Porno", car ce que nous voyons ici dépasse les limites 


de la bienséance! Notre HP-15C aurait-elle fauté avec une 


Des dessous pas très catholiques : 

Arrivés sous les jupes, nous allons devoir parler de 
matrice. Ce texte devient de plus en plus scabreux ! 

Vous savez sans doute , si vous possédez une HP-15C 
qu'elle affiche les matrices en présentant à l'écran , à 
gauche une lettre donnant le nom de matrice , à droite deux 


Chiffres donnant les dimensions de celles-ci, par exemple 

RCL MATRIX C donne [C 0 O0 (les lreprésen- 
tant le bord de l'écran) si la matrice C est dimensionnée 
à 0. 


Tapez maintenant 1,014 et faites D22 DEUX FOIS DE SUITE. 
Vous devez voir |y n ml. y est le nom d'une matrice 
que vous ne connaissiez pas, n et m les dimensions de la matrice 
A. On constate à l'expérience que la HP 15C peut afficher 
16 matrices différente que tous les passionnés d'informatique 
sauront immédiatement numéroter en hexadécimal de 0 à 9, 
puis de À à F. Noter que les matrices 0 et b ,8 etds'affichent 
pareil mais n'ont pas la même valeur, idem pour les matrices 
2 et 9. Vous trouverez les 10 premières matrices en remplaçant 
dans Île chiffre 1,01n le n qui était tout à l'heure égal à 
4 par une valeur de O0 à 9, les matrices A,B,C,D et E sont 
les matrices standard, la matrice F existe mais ne peut être 
vue que par des manipulations hasardeuses. 

Les matrices de la HP 15C peuvent être manipulées (oh) 
de deux façons directement en les appelant par leur nom 
à l'aide des touches À à E ou indirectement en plaçant la 
matrice à traiter dans le registre d'index I. 

C'est ce que nous allons faire avec notre matrice ÿ 
puisqu'aussi bien elle est disponible en x. Refaites maintenant 
cette matrice si vous vous en étiez écarté, puis STO I. 

IT faut maintenant DIMentionner Îles matrices convenablement. 
Faites O ENTER, f DIM C, f DIM D, f DIM E; puis 1 Enter 50 
(en fait le plus grand chiffre accepté selon le contenu de 
votre machine est Île meilleur. Pour commencer, prenez une 
machine vide) f DIM A. Si aucun élément perturbateur imprévu 
ne figure en mémoire, en faisant RCL (i) vous devez voir 

| t S0. 

ous allons maintenant examiner où se trouve 
quand à son "état" en faisant q MEM. Nous voyons : 
dd uu pp-b (cf notice, page 215) 

dd= numéro du dernier registre de la zone donnée, uu nombre 
de registres disponibles dans la zone commune,pp-nombre de re- 
stres utilisés dans un programme,b=nombre d'octets restant avant 
la conversion en programme d'un nouveau registre. 

Additionnez uu et pp. Vous aurez à faire cette opération 
souvent, n'oubliez pas que demoiselle HP sait aussi faire 
les additions ! 


notre machine 


faites maintenant uu+pp + 27 STO | 
(en notation HP : uu ENTER pp + 27 + STO 1). 

Continuez par 1 STO O0 
Vous venez d'initialiser les numéros de rang (R 0) et de 
colonne (R 1). Continuez en rentrant le nombre 1,006363 et 
faites STO (i). Essayer maintenant RCL E. Si vous voyez 


LE 99 99!, vous avez franchi un petit pas pour l'homme 
mais un grand pas pour la HP, elle va s'abandonner dans vos 
bras. Remarquez que la matrice D est dimensionnée à 1,0 ce 


qui est quand même curieux. Laissez le ou supprimez Île, c'est 
tout un, vous pouvez maintenant librement disposer de vos 
me À à D. Laissez FE à 99,99, cela va se révéler très 
utile. 

Assimilez bien les manipulations ci-dessus, vous en aurez 
besoin chaque fois que vous aurez réinitialisé votre machine. 
Le risque de réinitialisation accidentelle est faible, beaucoup 
plus faible que dans le cas de la HP 41C, cela ne m'est arrivé 
(pour l'instant) qu'une fois, mais j'ai déjà fait par erreur 
f MATRIX O ou -ON. 


Cette fois elle est à vous ! 


Vous pouvez maïntemant accéder à tous les registres de 
votre HP directement , car la Matrice NON NORmalisée (  MNN) 
est tout à fait différente des autres. son premier rang commence 
avec le premier registre de la zone commune et se continue 
à travers la mémoire programme et au delà , dans les registres 
d'état de la HP 15C 


Tes registres se trouvent après le registre 65 , je les 
ai numérotés à partir de El. Ils sont loin d'être tous  entiè- 


rement SHCTES » Je ne sais même pas à coup sûr combien il 
y en a ! 

il est possible de les atteindre avec la matrice E 99,99 
enmettant en RI un numéro de colonne égal à uu + pp + numéro 
du registre , c'est ce que vous avez fait tout à l'heure avec 
le registre E27 , sans le savoir... Nous y reviendrons. 

Les registres El, E2 et E3 ont un contenu évident. J'ignore 
encore exactement ce que contient le registre E4 N'oubliez 
pas que pour voir correctement le contenu d'un registre il 
faut visualiser la mantisse par f PREFIX . 

Le registre E5 est le dernier affichage, du coup il vous 
renvoie toujours le E Inn (nn est le numéro de colonne) qui 
s'est affiché fugitivement quand vous avez effectué RCL E. 
le registre E8 commande le mode USER de façon curieuse : si 
vous y stockez 1 (par exemple), le mode USER s'allume , et 
vous pourrez l'éteindre qu'en remettant ce même registre à 
0 , la touche f USER n'est plus efficace . E10 et El] commandent 
l'affichage , nous allons y revenir. El7 et El8 sont RO et 

RT , E19 est RI, E20 est Last x,E21 contient la racine de 
RANDOM et E26 et E27 les dimensions de matrices, d'ou l'opération 
de création de E 99,99, avez-vous vu 63 (hexa)=99(décimal) 


Savez-vous comment je m'appelle? 


n petit programme Va nous 
la demoiselle: 





permettre de faire parler 


1 LBL A 

2 SU STOE le u apparait si vous entrez l'instruc- 
tion en mode USER, il signale 
l'increment automatique des rangs 
et colonnes. 

3 g 

4 -STO E pas de mode user ni d'incrément 

5 RY 

6 DSE 1 

7 LBL 0 

8 GTO O0 


Vous allez initialiser en mettant uu+ pp + 10 en Rl et 
1 en RO; puis tapez 4.370000774, faites une fois D22 et lancez 
le programme A. Si tout marche bien vous allez voir clignoter 
le nom de la demoiselle H-P, ! 


en x [matrice[dim. comme] 


1,G19 


> do & j1< JU 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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| 
Î 
| 
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La HP 15C (comme toutes les HP) utilise pour ranger 
les nombres des registres contenant 56 bits ( les 0 où ] élémentaires), 


ou encore 14 digits (un digit est un groupe de 4 bits), ou encore 
7 octets (groupe de 2 digits ou 8 bits). 
Si nous étudions les digits de gauche à droite, nous 


trouvons : 

un digit qui contient 

0 (bits 0000) si le nombre est positif, 

1 (bits 0001) si le nombre est le nom d'une matrice, 

9 (bits 1001) si le nombre est négatif, 

toute autre valeur provoque l'affichage d'un signe négatif, 
mais le nombre peut se comporter bizarrement ! 

Les 10 digits suivants sont ceux de la Mantisse, c'est 
à dire les chiffres significatifs du nombre, ceux qui sont affichés 
par f PREFIX. 

Un digit qui 
9 selon le signe. 

Deux digits d'exposant qui sont normaux pour Îles nombres 
positifs mais codés différemment pour Îles nombres négatifs, en plus 
du signe de l'exposant -02 est codé 998 (signe et exposant). Vous 
obtenez donc la valeur de l'exposant en faisant 1000-valeur, le résultat 
vous donne même le digit de signe. 


contient le signe de l'exposant, à O ou 


Si vous avez rappelé en x un registre d'état ou un registre 
de programme, il se peut que le contenu de ce registre soit un nombre 
hexadécimal (voir encadré 2). Dans ce cas, l'affichage "normal" est 
fait sous forme "normalisée", c'est-à-dire que la HP n'affiche que 
des valeurs décimales. Les digits hexadécimaux sont traduits par 
leur contre valeur décimale (A-10, B-11...), avec report de la retenue 
ce qui entraine même une rectification de la mantisse quand Île digit 
le plus à gauche (le plus significatif) de la mantisse est hexadécimal. 
(déplacement_à droite de la mantisse avec ajout de 1 à l'exposant.) 

‘Tes rotations, surtout par paires permettent de décoder 
le contenu des digits de signes. Par contre, l'exposant est affiché 
en hexadécimal, et c'est également le cas de la mantisse montrée 
par f PREFIX. La comparaïson de ces deux formes vous montre les effets 
de la normalisation. Cette normalisation n'affecte que l'affichage 
et non pas Île registre. 


D22 : ce sont les initiales de Droite 22, c'est-à-dire rotation de 
22 bits à droite. Vous avez peut-être vu que 22 n'est pas un multiple 
de 4, donc le déplacement coupe en deux les digits pour Îles 
reconstituer autrement, ce qui permet des décodages au niveau du 
bit. Pourquoi cette fonction "RESET" a-t-elle ce résultat, je 
l'ignore. 


de 


fait permutation 
ce qui est 


Deux D22 provoquent une rotation (en 
circulaire) de 44 bits, soient 11 digits vers la droite, 
équivalent à une rotation de 3 digits vers la gauche. 

C'est ce qui explique la création de la matrice y 
1,014 : le 1 est là pour servir de premier caractère de la mantisse, 
le deuxième 1 après rotation de 3 digits à gauche prend la place 
du digit de signe et transforme l'affichage en affichage de matrice, 
le 4 est le chiffre qui est traduit par y, c'est donc le numéro de 
la matrice. 


avec 


Décimal, hexadécimal et HP 15C 
fous ceux d'entre vous qui lisent attentivement ce journal ont dé jà 
entendu parler de la notation hexadécimale. En bref, les ordinateurs, 
ceux de poche comme les autres, travaillent sur des éléments binaires, 
les bits. Or avec 3 bits on compte de 0 à 7 et avec 4 bits de O à 
15. S'arrêter de compter à 10 c'est trop pour 3 bits et c'est du 
gaspillage pour 4. Disons également qu'avec la table ci-dessous, 
il est très facile de traduire un nombre, même si il contient les 
56 bits du registre HP, de binaire vers l'hexadécimal et réciproquement 
ce qui est beaucoup plus délicat à partir du décimal. Habituellement, 
avec les afficheurs comme celui de la 15C, dits "à 7 segments", les 
lettres A,B,C,D,E et F de l'hexadécimal sont écrits A,b,C,d,E,F. 
Mais, qui sait pourquoi ? La HP utilise d'autres symboles : 


_dec | binaïire | hexa TH-P | 








| 

| Ü F 0000 [0 T0 
[1 | 0001 | 1 | 1 | 
| 2 | 0010 13 | # | 
LS | 0011 | 3 | 3 | 
| 4 | 0100 | 4 | 4 | 
| 5 | 0101 | 5 | 5 | 
| 6 | 0110 | 6 | 6 | 
b 7 | O111 l [7 | 
| 8 | 1000 | 8 | 8 | 
| 9 | 1001 | 9 | 9 | 
| 1C | 1010 | A | ? l 
| 11 | 1011 | B | - | 
| 12 | 1100 | C Lo Li 
| 13 | 1101 | D |P()] 
| 14 | 1110 | E | E | 
Û 15 | 1111 | Æ Iblanc | 


Sortons lui les tripes! 


la structure des registres 

de création 

déchiffrer 
PPC-T 


Avant de préciser le contenu et 
d'état il est nécéssaire de nous munir d'un outil 
de nombres hexadécimaux. Ceci va nous amener à 
les codes des instructions de la zone program. 


. té OMEYU uit, id iiabr ice E  Yy,yy 
et entrez le programme suivant: 
001 LBL 00 
092  LBL 01 
003 IBL 02 
004 BL 03 
005 LBL 04 
006 ELBL 05 
007 IBL 06 


faites g MEM pour lire éd uu ppt 

placez en RI la valeur uu+pp, en RO la valeur ], 

et faites RCL E (n'oubliez pas qu'il est plus commode de tr: 

vailler en SCI 9). 

Vous voyez 6,050403 00 

qui, à l'aide de f PRGM et de D22 se traduit rapidement par 
06050403020000 


IT va falloir lire de droite à gauche par groupes de deux 
soit (un octet par instruction), Ta correspondance apparait 
alors: 
Ligne instruction code 

001 LBL 00 00 

002 LBL 01 00 

003 LBL 02 02 

004 LBL 03 03 

005 LBL 04 04 

006 LBL 05 05 

007 LBL 06 06 


La traduction semble maintenant évidente, mais le cas du LB: 
OT attire l'attention, en effet on attendrait plutôt le code 
01! et de toute façon il n'est pas possible que deux instruction: 
(LB1 00 et LblOl) aient même code. En fait il est facile de 
vérifier que si on modifie l'ordre des Lbl dans le progr amme 
on obtient bien le code 01 pour Lbl O1, ceci nous amène à 
deux conclusions: 

-le registre E 1,( 
de la mémoire programme, 

- certains digits sont modifiés lors du rappel 
entre la mémoire et l'affichage (cf encadré). 


uu+pp) est le premier registre 


Remarquez aussi que le deuxième registre 
de la mémoire programme est E 1, (uu+pp=1). 

Et encore, que la HP écrit ses programmes 
en remplissant les registres de droite à gauche (les numéros 
de ligne les plus bas à droite). 

Des essais successifs nous amênent à établir 
les tables d'instructions, voir N°5 

La table des instructions "à un octet" est 


pleine, sauf la dernière colonne, celle des codes nF. Certains 
de ces codes annoncent des instructions "à deux octets", Îles 
autres paraissent inutilisés; et donnent des résultats bizarres 


quand ils sont placés (STO EF) en mémoire. Je n'ai pas encore 


trouvé le code des instructions non programmables comme f 
PREFIX ou PROGRAM, mais il y a encore beaucoup de choses à 
essayer... 

[1 est relativement facile de créer un registre avec 


des valeurs hexadécimales en créant en début de mémoire programme 
la suite d'instructions ayant le bon code et en le rappelant 
en x. La normalisation du signe de l'exposant est cependant 
génante, le D22 devient alors utile pour décaler le registre 
par bits ou par digits. 


Reconstituerle squelette 


la 
en 


Nous pouvons maintenant trouver le plan 
mémoire et détailler les registres 
quelque sorte le squelette de notre demoiselle. 

La matrice E 99,99 à le premier registre de son premier 


complet de 
d'état, 


rang au début de la zone commune (uu) puis la zone programme 
(pp), puis les registres d'état. Par conséquent la création 
de nouvelles Tignes de programme ne déplace pas l'origine 
de notre matrice. Par contre toute modification des zones 
matrice, registre complexe, solve ou integrate déplace notre 
origine. 
Mais comment accéder à ces zones, situées au dessus de 
la matrice E ? L 
tout simplement en utilisant le rang 0 de la matrice. 
Rang 0? Mais O0 STO O RCLE donne Error 3! 
IT va falloir ruser! Voici les opérations 
dans l'ordre: 
-Créer un programme 
001 LBL A 
002 is! B 
003 LBL C 
-faire g MEM et calculer la valeur uu+pp 
-placer cette valeur en RI et 1 en RO 
-faire RCL E ;on rappelle ainsi le premier registre 
de la zone programme, 


Noë 
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faire D22 deux fois. On obtient un nombre non normalisé 
avec un exposant nul, 

faire STO 0, ça y est, vous avez votre rang 0 de Ja 
matrice. à partir de maintenant STO ou RCL E fera apparaitre 
E  0,%x; 
Méfiez-vous, si xx est 99, au prochain tour (gare au mode 
user!) la HP incrémente RO et démoli votre édifice. 

Le rang O0 fini là où le rang 1 commence, ou plutôt un 


Donc E 0:99 est le dernier registre de 


registre au-dessus. 
la zoné matrice. 
Il y a 64 registres 
d'état, donc: 
-la zone programme se compose des registres situés de 
64 à 64-pp+1 (inclus) 
La zone commune se compose des registres 
64-pp à 64-pp+1 (inclus) 
-La zone spéciale se compose des registres 
1 à 64-uu-pp (inclus) 


à répartir au total hors les registres 


Le registre n°1 a donc le rang E 0,99-(64-uu-pp)+1,soit 


E 0,99-64 +uu+PP+1 =E 0,36+uu+pp 
Donc, en fait tous les registres sont compris entre 
E 0,36+uu+pp 
et 
E 1,uu+pp 


re 


Commentaire des tables des codes (cf N°5) 
7 * Es repres des Codes 


les octets représentant les instructions sont indiqués 
comme ils apparaissent à l'affichage. le numéro de rang est 
le digit de gauche, 1e numéro de colonne le digit de droite. 

les instructions ayant un lien logique sont encadrées 
quand c'est possible pour faciliter leur recherche. Ainsi 
DSE (i) est le code 83, STO D est 4D. 

Toutes les cases de la table sont occupées, sauf dans 


la colonne nF, est celle des préfixes des fonctions à 
deux octets. 

Comme 1 n'y avait plus de place dans un seul 
a dû utiliser deux octets pour certaines fonctions. 
octet de toutes les fonctions à deux octets a son 
droite égal à F. 

La deuxième table explicite toutes les fonctions légales 
à deux octets. Ces fonctions Comportent donc 4 digits qui 
apparaissent de droite à gauche dans la table comme à l'affi- 
chage. 

la première colonne à 
la fonction (celui de droite). 


AF à FF. 


qui 


octet ,HP 
Le premier 
digit de 


droîte donne le premier octet de 
Seuls sont légaux les octets 


Le digit le plus à gauche se lit dans la 
dernière colonne de gauche, à chaque premier octet correspond 
un certain nombre de digits qui sont classés par ordre croissant 
dans chaque rangée correspondant à un premier octet particulier. 


le digit intermédiaire est la valeur de l'argu- 
ment. Les fonctions et les arguments légaux sont indiqués 
dans les cases quadriilées. 


STO .9 est donc D9 DF 
DSE A est 7A FF 
IL ya au total 562 fonctions programmables... 
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HP 5 C HP I5 cC HP I5 C 
Codage des adresses mémoire 


D'une facon générale, la mémoire est divisée 
en registres de 7 octets chacun, Un registre 
contient soit «7 octets d'instructions programme, 
soit un nombre (registres de données, éléments 
de matrice). Pour que la machine puisse savoir 
Ce qu'elle fait, il faut bien sûr qu'à chaque 
registre soit affecté une adresse. Dans la HP I5 
cette adresse est composée de deux nombres hexa— 
décimaux (en base 16,où l'on compte de I à F(IS) 
ce qui fait au total 256 adresses possibles, 
Ainsi dans la matrice E 99.99 (pour son obten— 
tion, voir articles précédents), qui permet de 
Visualiser la mémoire, on retrouve tous les 256 
éléments les mêmes registres, Par exemple, le 
registre qui est en ©T,1 est le même que celui 
qui est en 3,59 (256-2x99 458 = 2 lignes et 58 
éléments. Avant de décrire plus précisément le 
systéme d'adressage, rappelons l'organisation 
de la partie de la mémoire qui nous interesse: 
Précisons bien la façon dont la zone programme 
Se remplit. Au fur et à mesure que l'on écrit 
un programme, on"empiéte" sur la zone commune 
libre. Le programme s'écrit donc en "remontant" 
et,à l'intérieur d'un programme, de la droite 
vers la gauche, alors que »par exemple, le regis- 
tre de données 3 est après le 2, et s'écrit dans 


SOIVE 


icne ue 


Pile 


imaginaire 





p- 


Eléments 








Zone 
programme 


Les registres de la matrice Æ 99,99 se 


lisant dans le sense des adresses croissantes, 
les registres des premiers pas de programme se 
liront en dernier et auront une adresse supé— 
rieure au autres, 

La numérotation des registres 5e fait "à re— 
bours " ,à partir du registre -où sont inscrits 
les premiers pas de programme, qui est toujours 
numéroté FF . Le précédent a l'adresse juste 
inférieure, c'est à dire FE » et ainsi de suite... 
Par exemple, si on utilise que sept octets de 
programme, si la zone commune est vide, si E est 
dimensionnée à 0,0 (ou Non normalisée, comme 
c'est en fait le cas) et si D contient 3 éléments 

quel sera l'adresse du premier élément de D ? 

Réponse : FC 

Dans le registre d'état numéroté 22 (voir 
article précédent pour la numérotation des re— 
gistres d'état visibles par l'intermédiaire de 
la matrice E 99,99), le IT octet (quartet de 
signe + I quartet de la mantisse) indique en 
base 16 le nombre de registres utilisés avant 
R 2(pile imaginaire, Solve,. | 

L'octet suivant (en lisant de gauche à droi= 
te) contient l'adresse du IT élément de la ma- 
trice A. On a ensuite la matrice B ....etc 

L'adressage en zone programme se faisant sur 
une instruction, donc sur un odtet, il est néces- 
Saire d'affiner le systéme en rajoutant un troi- 
siéme chiffre pour indiquer quel est l'octet du 
registre qui est adressé. Le chiffre est placé 
avant les deux autres et est compris entre 2 
( pour l'octet "de droite", qui contient dans 
un registre de données les chiffres de l'expo 
sant) et 7 (pour l'octet "de gauche", qui con 
tient le quartet de signe et le premier chiffre 
de la mantisse) 

C'est ainsi que l'on trouve dans le regis 
tre 24, à la place de l'exposant,l'adresse de 
l'octet pointé, et à la place du signe de l'ex 
posant,le numéro de l'octet dans ce fegistre. 

Pour les adresses de retours de sous pro- 
grammes,qui sont placées dans les mantisses des 
registres 24 puis 23 , le Codage rénond au même 
principe, à la seule différence que le chiffre 
des "Seizaines" est égal au chiffre des seizaines 
de l'adresse normale moins un ,et que le numéro de 


l'octet est compris entre 2 (octet'"de droite") 

à 7 (avant dernier octet "à gauche"),L'octet "de 
gauche est noté comme le premier octet du regis 
tre suivant, et s'il n'y a pas d'octet suivant, 
il est codé OFO. Autre explication: l'adresse 
d'un octet dans ce code est celle,dans l'autre 
code de l'octet placé seize registres et un octet 
plus haut.(Ou II3 octets plus haut) Ou encore, 
pour traduire l'adresse XYZ du code sous program— 
me au code normal i} fautcalculer XI; Si X-I 

est égal à zéro, on remplace YZ par YZ-I et X 
par 7:, ou bien par OFO si on est dans le dernier 
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registre utiiise pour le programme.Enfin, on 
remplace Ÿ par Y-I , Pour tous ceux que ces 
explications fumeuses n'ont pas éclairé, voici 
quelques exemples: 


rang de l'octet adresse adresse pour un 
dans le prem normale retours de ss-prgm 
de IFF 2EF 
ee GFF TEF 
7 7FF IEE 
y39me 
Taeme 6FE 7EE 
mé FE IED 

15 IFD 2ED 
3 pl 6FD 7ED 
pr 7FD IEC 
io IFC 2EC 

eme 
He #2 

eme 12 
LES IEF 2DF 
AATSS 6CO 7B0 
44gême 7co OFO 


Dans le cas d'une instruction à deux octet, les 
deux ont une adritsse, l'appel üe l'instruction 
se fait sur le premier octet des deux. 

Et enfin un petit calcul: de 00 à FF, cela fait 
256 adresses possibles (en comptant 00 comme 
adresse). On æ 64 registre de mémoire vive uti= 
lisables à volonté, plus RO, RI , I, RANDOM, 
la pile, les regitres d'état: environ une cen- 
taine de registres, Et les autres adresses? 
Bont elles bétement vides? Remplissables ? la 
machine pourrait-elle les gérer?. , 

Signalons que llorsque l'on remplace les vraies 
adresses: des matrices par des fausses, on 
plonge la machine dans un drole d'état: la répon- 
se à MEM(demande de la partition mémoire) est 
Error 10, de même qu'a tout’. essai de change 
ment de la partition mémoire (même dans le sens 
d'une diminution du nombre des registres alloués) 
Et les registres de données sont en fait des 
registres d'état (en général, R6 correspond à 
Re qui est nuréroté 10) 

core des explorations en perspective! 
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MICRO CODE 


suite à l'article de Stéphane Barisien (programme CHARGE ——) 
J'ai tenté de comprendre la signification des deux premiers 
bits des deux premiers mots du nom de la fonction (de bas en 
haut), et je suis arrivé aux conclusions suivantes: mais ceci 
reste a confirmer car je ne possede ni MLDL ni #E. Je pense 
que les deux 1 bits des deux 1° mots sont etroitement liés 
et donnent : 


1 Emot 2°mot signification possitle (?) 

1 O 1 tiret, ALPHA oblisatoire, pas adressage 
indirecte (ex: ASN, COPY ...) 

1 1 3 tirets, possibilité de “EX, pas IND 
(ex: DEL, SIZE) 

1 2 jamais rencontré 7??? 

1 3 1 tiret, poss IND, (ex: ENG, TONE...) 

0 2 tirets, poss de + - / X, d'adressage 

indirecte, de ,.(35T), seulement STO 

2 Î 2 tirets, .(ST), IND, (ex: ROL, Sa .….) 

2 2 2 tirets, IND, (ex: 5F, SREG ...) 

2 3 Jamais rencontré 7??? 

3 C LBL 

5 1 XEG 

3 è jamais rencontré 7??? 

3 3 GT0 


i'apres une etude du #0!" interne. 
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HP-41C 
Programmer en microcode, pourquoi pas ? 
POURQUOI ? 


Je viens de faire un petit test qui me parait significatit 
Je dispose d'un programme en microcode qui tait la simple 
chose suivante : dans une boucle additionner | à chaque tour. 
Si une touche est pressée, formatter le nombre ainsi obtenu 
pour pouvoir l'afficher, et l'afficher. Je lui aï compare 
le programme classique suivant 


O1 LBL "EDC" Le END est Tà pour montrer que 
02 LBL A le programme à été “packé". Les 
03 CLX deux GTO O1 sont là pour vous 
04 LBL 01 éviter le souci de savoir si 
05 ISG X le ISG saute ou non. Le programme 
06 GTO 01 a tourné une fois avant l'essai 
07 GTO 01 pour compliler les GTO. On peut 
08 END facilement faire plus court, 


je ne pense pas qu'on puisse faire plus rapide. Noter qu'au 
moment de l'essai ma 41C était reliée à un grand nombre de 
modules, y compris une imprimante et qu'il ne faut donc pas 
Comparer ces résultats à VOTRE machine. Simplement les deux 
essais étaient menés dans les mêmes conditions. J'ai fait 
pour chacun deux essais, je vous donne les moyennes. 

Pour 30 secondes de chrono la routine en microcode a compte 
jusqu'à 62786. Le programme ci-dessus a compté jusqu'à 272. 
Jde n'ai pas voulu épiloguer en faisant un rapport, mais je 
maintiens d'un coté SOIXANTE DEUX MILLE SEPT CENT QUATREVINGT 
SIX et de l'autre DEUX CENT SOIXANTE DOUZE pour les mêmes 
30 secondes. 

Je ne vous donnerai pas la routine microcode ici, Sachez 
qu'elle fait quand même 22 mots machine de long. 

Cet exemple, même s'il est simpliste, montre bien un 
des avantages du microcode : il va VITE. 

Son autre avantage est de permettre des fantaisies interdi- 
tes autrement : ma machine n'a pas le même MEMORYLOST que 
la votre (ici prend place un pied de nez !), elle termine 
avec S[ZE 026 (quelque soit le nombre de modules mémoire), 
FIX2 et notre chère virgule française. 

Si tout ceci ne vous à pas donné envie de faire comme 
moi, c'est que vous n'êtes pas un "FAN". 


COMMENT ? 


Disons tout de suite que programmer en microcode une 
HP 41C nécessite une volonté certaine, quelques moyens financiers 
et surtout un coeur “gros comme ça !" 

Pourtant, depuis peu, il est possible de faire tout cela 
Sans sortir de notre territoire national pour ramener des 
éléments exotiques de lointaines contrées. 


Pour résumer, il faut, en plus d'une 41C en état de marche, 

un certain matériel et une certaine documentation. 
Renseignements préliminaires : NON il n'est pas possible de 
programmer votre 41C en microcode à partir du clavier et dans 
la mémoire programme. Pour une raison de moi inconnue HP utilise 
comme unité d'instruction machine un mot de 10 bits, au lieu 
de l'octet utilisé par tout le monde, HP Y compris le plus 
souvent. 

Le programme EDC ci-dessus est composé d'instructions 
organisées autour d'une unité commune de HUIT bits (éléments 
binaires) formant un MOT de mémoire vive. 

Tous les programmes en mémoire morte de la 41]C utilisent 
l'unité de 10 bits des instructions machines. Vous ne Île voyez 
pas, et pourtant c'est ainsi qu'elle tourne. 

Quand les précurseurs du club PPC américain ont voulu 
programmer en microcode, ils ont dû résoudre le problème consis- 
tant à ranger des mots de 10 bits dans des rangements de & 
bits, constitués par des circuits courants dans le commerce 
et appelés EPROM. 

Relisez plusieurs fois s'il le faut le paragraphe précédent. 
Comment ranger le contenu de 20 bouteilles d'un litre de vin 
dans des bouteilles de 75 centilitres ? n'oubliez pas qu'il 
y à des crus différents à ne pas mélanger !!! 

L'éternel miracle de la vie informatique ayant fait son 
oeuvre, une solution a été trouvée : pour chaque Titre de 
vin on va utiliser 2 petites bouteilles. Simple, non ? 

Pour la HP, c'est pareil, on utilise, pour construire 

1 module de mémoire morte, 2 circuits électroniques  EPROM. 
IT ne reste plus qu'à construire une boite de triage qui sera 
capable de reconstituer le module initial à partir des deux 
EPROM. et cela mot par mot. 
À la programmation chaque mot d'instruction est coupé en 
deux, un morceau va dans une FPROM, un autre morceau va dans 
une autre EPROM. A la lecture un circuit reconstitue le mot 
initial à partir des morceaux. 

C'est Jim de Arras (PPC N° 4706) qui, le premier a su 
réaliser ce travail et fabriquer l'appareil capable de ce 
travail que l'on appelle depuis l'EPROM BOX, en français Boite 
d'Eprom ou lecteur d'EPROM. 

Si vous êtes toujours avec nous c'est que le microcode 
vous intéresse vraiment, bravo ! 


UNE  vOILE u LFRUM est actuellement disponible au Sein 
au club français PPC-Toulouse. Sa fabrication est aujourd'hui 
artisanale et réservée aux membres du club, mais Île succès 
aidant une fabrication pourrait être envisagée par le concepteur, 
Didier Jehl (8116 T 80). Le prix de cet appareil est d'environ 


800 F, donc du même ordre de grandeur qu'un module courant. 


Mais attention, cet appareil est un lecteur, il ne peut 
pas programmer. Il ne peut qu'utiliser les eproms actuellement 
diffusées par le club. 


PROGRAMMER SOI-MEME 


Le seul moyen largement accessible actuellement pour 
programmer soi-même est d'acquérir un programmateur d'EPROM. 
Le seul modèle d'un prix accessible qui soit indépendant d'un 
ordinateur est un excellent petit appareil appelé SOFTY et 
distribué par Pentasonic au prix de 2250 F. Un jeu d'EPROM 
(une 2716 + une 2732) côute entre 100 et 150 F selon la source 
d'approvisionnement, les  EPROM  préprogrammées 
sein du club le sont au prix de 200 F. 

Bien sûr un même lecteur d'EPROM peut utiliser successive- 


ment autant d'EPROM que l'on veut, ces appareils sont munis 
de connecteurs spéciaux qui permettent de changer Tes EPROM 
presque aussi facilement que les modules d'origine. 

L'appareil lui-même est de l'encombrement de la 41C et 


relié à celle-ci sans aucune soudure par un 
un connecteur dans un des ports de sortie. 


cable plat et 


ECRIRE DES PROGRAMMES MICROCODE : 

ous venons de voir Île matériel nécessaire. Il y a également 
des appareils plus élaborés, mais ils ne sont pas actuellement 
disponibles en France, je n'en parlerai donc pas. 

Programmer en microcode, c'est d'abord connaître à fond 
sa HP-41C. Pour cela Île livre écrit par votre serviteur (au 
fond de la 41C) est à peu près indispensable. 

Vous y trouverez tout Île jeu d'instructions du micro- 
processeur (tout cela a été décodé par des utilisateurs de 
la machine, membres de PPC, en particulier Paul Lind (6157). 
Brutalement on peut considérer que cela suffit. En fait, il 
faudrait être vraiment très fort pour s'en contenter. Heureuse- 
ment à cela vient s'ajouter une très volumineuse documentation 
accessible par l'intermédiaire (toujours, excusez m'en !) 
du club PPC-Toulouse. La documentation se compose essentiellement 
de la liste sur papier des programmes contenus dans tous les 
modules HP courants, à commencer par les modules de mémoire 
morte contenus dans la HP depuis l'origine. Cela représente 
prês de mille pages de photocopies ! 

Hewlett Packard à été tellement surpris de voir le club 

déchiffrer et utiliser le microcode qu'ils nous ont fait cadeau 
de leurs prores notes sur le contenu des modules internes 
de la 41C. Pas toujours facile à déchiffrer, mais où serait 
le plaisir si c'était facile !!! 
Ce qui rend l'élaboration des programmes en microcode difficile 
c'est l'absence totale d'aides à la programmation. En fait, 
nous avons bien des programmes conçus par le club, qui sont 
une aïde précieuse, mais pas de mode trace, pas de possibilité 
d'insertion et d'effacement d'une ligne à moins de refaire 
une EPROM, pas de messages d'erreur, et le plus souvent Memory 
Lost au bout ! 

Et bien cette absence d'aides doit être retournée en bien 
et nous amener à programmer proprement du premier coup. lJe 
me souviens d'avoir lu dans les livres d'Arsac qu'un bon program- 
me doît tourner du premier coup. Combien d'entre nous respec- 
tent cette condition ? Et bien en microcode vous apprendrez 
à structurer une analyse descendante, à partir d'un problème 
bien défini pour arriver à un résultat bien défini, à découper 
votre problème en modules (réutilisables si possible) parfaite- 
ment analysés, et je suis persuadé que vous ferez des progrès 
spectaculaires même dans votre programmation de tous les jours. 


EN GUISE DE CONCLUSION 


Il n'est pas possible pour un amateur d'écrire des pro- 
grammes en microcode très longs. Le meilleur usage qui peut 
être fait du microcode est la création de nouvelles fonctions 
très puissantes, permettant des programmes très efficaces. 

Un programmateur d'EPROM pour une seule personne est 
un jouet coûteux, acquis par un groupe d'une dizaine d'amis, 


cela devient un outil décisif. Pour un usage professionnel 
les possibilités sont illimitées. 
MISE A JOUR 


L'article ci-dessus avait été écrit il y a quelques mois 


pour une revue qui n'en à pas voulu. Depuis bien des choses 
se sont passée: Le lecteur d'eproms du club (enfin, celui 
de Didier Jehl) est moins cher, une version professionnelle 


est disponible à Ia SICAPE, elle coûte je crois 1300 F, mais 
peut-être gonflée jusqu'a 16 Koctets. Elle représente une 
exellente solution pour conserver des programmes professionnels 
d'usage fréquent. 

L'appareil plus élaboré dont je ne voulais pas parler 
est maintenant disponible en France. La souscription lancée 
dans la dernière circulaire n'est valable que jusqu'a la fin 
de Juin et il sera sans doute trop tard quand vous lirez ces 
lignes, mais en Septembre la construction sera reprise, avec 


diffusées au. 


Cependant un prix plus élevé, de l'ordre de 2500 f. Mais cet 
appareil constitue à la fois un lecteur d'Eprom et une mémoire 
vive qui fait également 4 Koctets, conc au total 8 Koctets 
de place disponible. Surtout c'est un outil prodigieux pour 
la programmation en langage machine. 


J-D Dodin (7226 T 1) 
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A votre avis, qu'est-ce qu'il y a dans les photocopies "Microcode 
PPC"? Ta lecture des anciens numéros vous aurait renseigné... 


* * 


La page suivante est trés importante, c'est 
je la passe tel que, je ne suis pas capable de traduire 
mand, mais il est facile de voir qu'il s'agit du projet d'un 
ROM custom, c'est à dire fabriqué par HP pour un particulier 
et prévu pour contenir des instructions "club". Si quelqu'un 
peut m'en faire un résumé en français il passera dans le prochain 
numéro. 

Les remaraques sont à faire à Wolfgang Baltes 
D 8000 MUNCHEN 70, RFA. Vous pouvez écrire ou 
allemand, anglais ou français (1). 


* * 


pourquoi 
l'alle- 


Guardinistr. 
téléphoner en 


Jean Claude BORNES 
PPC 9250 / T 175 
10,Allée de la Brie 

LISSES 
91000 EVRY 


Lisses, le 22 avril 1983 


Cher Jean Daniel 


J' ai beaucoup tardé à envoyer cette lettre, mais pour 
installer la machine, il fallait que je range mon MLDL. 


J'ai bien reçu le jeu d'EPROM. Malheureusement, 
c'est lui qui a été la source de mes soucis.Je décris donc mes 
problèmes : 


PPC-T Noë 
JUILLET AQUT 
1983 P22 








CCD-ROM-Projekt 


CCD e.V. Computerciub Deutschland / Prisma er né cam 








Heute môchte ich Euch ein Projekt vorstellen, 
um das ein paar andere Mitglieder und die Un- 
terzeichner sich schon seit einiger Zeit Gedan- 
ken gemacht haben: die Erstellung eines Mo- 
duis für den HP-41 mit in Maschinensprache 
programmierten Funktionen. 

Während des Ende Februar in Frankfurt statt- 
gefundenen “1. Personal Computer Sympo- 
siums” von Hewlett-Packard, auf dem unser 
Club einen Stand hatte, bot sich reichlich Gele- 
genheit, mit den verschiedensten Leuten von 
HP zu sprechen. Dabei wurde uns zugesichert, 
die Anfrage in den USA, ob und in welcher 
Form HP ein solches Modul produzieren will, 
Zu untrstützen und desweiteren uns eventuell 
mit weiteren Unterlagen über den HP-41 die 
Arbeit zu erleichtern. 

Am Samstag, den 26. Februar 1983 fand in 
Glashütten ein Treffen zwischen Wolfgang Bal- 
tes (155), Roland Freytag (1064), Ulrich Jan- 
sen (283), Peter Kiefer (958), Wilfried Kôtz (?), 
Andreas Marktscheffel (69) und Ralf Mulch 
(886) statt, wobei eine erste Liste von Funktio- 
nen zusammengestellt wurde, um das Projekt 
zu umreiBen. 

Hier nun, was dabei herauskam: 


Systemroutinen: 

CATALOG - Anzeige der eingesteckten Modu- 
le, Auflistung der Funktionen eines einzelnen 
Modules 

SAVE STACK - Temporäres Abspeichern der 
Stackregister 

RECALL STACK - Zurückholen der abgespei- 
cherten Stackregister 

SWAPSTK - Vertauschen des aktuellen mit ei- 
nem vorher abgespeicherten Stack 
PASSWORD - Rechner nur nach Eingabe ei- 
ner (selbstdefinierten) Zeichenfoige nutzbar 
CRASH RECOVER - Erzeugen eines definier- 
ten Rechnerstaturs, Retten von ‘’verlorenen’ 
Programmen 

SWAPKA - Vertauschen zweier Blôcke von Ta- 
stenzuordnungen 

DEFAULTKA - Tastenzuordnungen für die 
oberen beiden Tastenreihen aktivieren/deakti- 
vieren 

PACKKA - Packen der Tastenzuordnungsregi- 
ster (eventuell automatisch beim Einschalten 
des Rechners) 

FREE - Ausgabe der Anzahl der noch unbe- 
nutzten Register 

RUN - Ausführen eines vordefinierten Pro- 
grammes, das dabei entweder im Hauptspei- 
cher oder im ‘’Erweiterten Speicher’ (X-Memo- 
ry) stehen. 


ALPHAroutinen: 

Generell soll ein besonderer Alphamodus im- 
plementiert werden der Art, daB bei zusätzlich 
gesetztem USER-Modus ungeshiftet alle Klein- 
buchstaben und geshiftet weitere Sonderzei- 
Chen vorhanden sind. Dieser Zustand wird bei 
eingestecktem Modul immer vorhanden sein, 
so daB er sowohl beim Programmieren als 
auch bei der üblichen Eingabe in das ALPHA- 
register aktiv ist. Dies erlaubt zum Beispiel die 
Eingabe von Kleinbuchstaben in Programmtex- 
ten ohne jede Schwierigkeit. 

OUTREC - Ausgabe eines ASCII-Records (X- 
Functions) 

EDIT - Direktes Editieren eines ASCII-Files 
PRA- - Print Alpha mit automatischem Unter- 
streichen beziehungsweise beim Video-Interfa- 
ce in Invers-Video-Darstellung 


ARCLINT - ARCL X im Format FIX 0, ohne De- 
zimalpunkt, jedoch ohne den aktuellen Display- 
Status wirklich zu verändern 

ARCLHMS - ARCL X im Format Grad/Min/Sek. 


Mathematische Routinen: 

XYZCW - Zusammenfassen der drei Stackregi- 
ster X, Y und Z in das Format der Standartisier- 
ten Kontrolizahl xxxx.yyyzz 

CWXYZ - Zerlegen der Standartisierten Kon- 
trollzuahl in die drei Komponenten 

D-H - Zahlenkonvertierung von der Basis 10 
zur Basis 16 

H-D - Zahlenkonvertierung von der Basis 16 
zur Basis 10 

D-B - Zahlenkonvertierung von der Basis 10 
zur Basis 2 

B-D - Zahlenkonvertierung von der Basis 2 zur 
Basis 10 

REC-SPH - Koordinatentransformation von 
rechtwinklig nach sphärisch 

SPH-REC - Koordinatentransformation von 
Sphärisch nach rechtwinklig 

EULER - Euler-, Kardanwinkelberechnung 
HMSRND - Runden im Sexagesimalsystem 
{hh.mmss) 

SIGMA - Recall der einzelnen Statistikregister 
LINREG - Lineare Regression 

SOLVE - Kernroutine für Nulistellenprogramme 
INTEGRATE - Kernroutine für Integrationspro- 
gramme 

HORNER - Funktionsberechnung eines Poly- 
noms 

SUM - Summation von Funktionswerten 
MATRIX - Ein-/Ausgabe, +, —, x, /, Pivotisie- 
rung, Umwandlung zwischen Index- und Regji- 
steradressierung 


X-Memory-Routinen: 

RENAME - Umbenennen eines Files 
COMPRES - Verkürzen eines Daten- oder AS- 
Cli-Files 

EXPAND - Verlängern eines Daten- oder AS- 
CIi-Files 

CHANGE - Verändern eines Dateityps 


IL-Routinen: 

SLCTPR - Automatisches Selektieren eines 
Druckers 

SLCTVI - Automatisches Selektieren eines Vi- 
deo-Gerätes 


Spezielle Routinen: 

LB - Editieren einzelner Bytes im HEXcode 
oder als ALPHAzeichen 

KA - Zuordnen von beliebigen Codes auf eine 
Taste 

PEEXK - Liefert den Wert eines Bytes aus einer 
absoluten Adresse 

POKE - Speichert ein Byte in eine absolute 
Adresse 

PBG - Schnelle MeBdatenerfassung mit dem 
PBG-Gerät 

RCLABS - Nichtnormalisierender Rückruf aus 
relativen 


einer wahlweise absoluten oder 
Adresse | 
STOABS - Speicher in ein absolut adressiertes 


Register 

CODE - Erzeugen eines beliebigen HEXcodes 
DECODE - Darstellen eines Registerinhalites 
im HEXcode 
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AND - Bool'sche Funktion auf die 56 Bit von X- 
und Y-Register 
OR - Bool'sche Funktion auf die 56 Bit von X- 
und Y-Register 
XOR - Bool'sche Funktion auf die 56 Bit von X- 
und Y-Register 
NOT - Bool'sche Funktion auf die 56 Bit von X- 
und Y-Register 


Natürlich ist das nur eine voräufige Liste. Das 
Modul soll so anwenderfreundlich wie môgJlich 
werden; so werden Druckfunktionen sowohl mit 
den drei Druckern als auch mit dem Video-In- 
terface kompatibel sein: Fehlermeldungen sol- 
len môglichst genau auf die Ursache hinwei- 
sen. Dieses Anforderungen und die Fülle der 
Funktionen sind so speicherplatzintensiv, daB 
ein 8k-Modul, wenn nicht sogar ein 12k-Modui 
erwogen wird. In letzterem Faille würde auch 
ein Systembereich des Rechners, nämlich der 
des Service-Moduls, mit in Anspruch genom- 
men, wodurch sich weitere zusätzliche Môg- 
lichkeiten erôffnen. So kann damit ein wir- 
kungsvoller Schutz des Rechners gegen unbe- 
fugtes Benutzen realisiert werden. Insgesamt 
kônnen in einem solchen Modul bis zu 127 
Funktionen untergebracht werden. Um ein 
môglichst nutzbringendes Modul entwerfen zu 
kônnen, bitten wir hiermit jeden einzelnen von 
Euch, Vorschläge und Wünsche der zu imple- 
mentierenden Funktionen an 


Ulrich Jansen 
MühlenstraBe 16 
5140 Erkelenz 


einzusenden. Wohigemerkt: Es dreht sich da- 
bei nur um die Artikulierung von Zielvorstellun- 
gen; ob und wie diese zu realisieren sind, wird 
dann in einem daran anschlieBenden Schritt 
von den Mikrocode-Programmierern des Mo- 
duls erarbeitet. Ideal wäre, wenn Eure Vor- 
schläge Folgendes beinhalten würden: 

- Art der Funktion; was soll die Funktion bewir- 
ken 

- Eingabeparameter 

- Ausgabeparameter 

- vorgesehene Fehlermeldungen 

- ein Beispiel (in normalem HP-41-Tastencode) 
zum vorgesehenen Gebrauch der vorgeschla- 
genen Funktionen 


Dabei sollte beachtet werden, daB wegen der 
Mikrocode-Programmierung dieser Routinen 
damit dem HP-41 auch ganz neue, ungewôhn- 
liche Eigenschaften und Fähikgkeiten entiockt 
werden kônnen. Mit anderen Worten: durch Mi- 
krocode-Routinen kann auch bislang Unmôgii- 
ches auf dem HP-41 bewirkt werden. 


Die Details zu unserem neuen ROM-Projekt 
sind noch nicht geklärt; wir werden Euch im 
PRISMA darüber auf dem Laufenden hailten. 
Sicher ist nur, daB das Gelingen eines solch 
aufwendigen Projektes von Eurer Mitarbeit ab- 
hängt und von Eurem interesse getragen sein 
muB. Deshalb hier nochmals unsere Bitte: Arti- 
kuliert Euch; entweder an Ulrich (Anschrift sie- 
he oben) oder an Wolfgang (Telefon 089/ 
7001540 ab 19 Uhr). 


Wolfgang Baltes (155) 
Ulrich Jansen (283) 
Andreas Marktscheffel (69) 


EEE END. 
83.3.05 


Cas J: Lors d' un Catalog ?,1a machine se plante 
en arrivant à XC>ROM qui n'est pas listé. Le listing en SST 
montre des affichages fantaisistes OF JO dans le port 2, 

NY= dans le port 4, d dans le port 3, ces anomalies toujours 
à la place des mêmes noms, la machine se plantant en arrivant 
à CODE. Si je la fais repartir sans MEMORY LOST, elle se 
plante à DE, PPACK, PKEY. quand je repart après CODE, la 
plupart du temps l'indicateur PGRM est mis. 


Cas 2: Lors d'un CAT ?, la machine affiche 
OF JO (OF pJO sur l'imprimante) ou autre, se plantant en fin 
de Catalogue, la dernière fonction (X3ROM) ne s'affichant 
pas. 


Cas 3: Le CAT 2 se déroule normalement, la 
machine se plantant sans afficher la dernière fonction. 


* En résumant, quelques cas de figure: 


Circuit à l'envers pour les mesures, cas 1 

Circuit soulevé, cas 2. 

Circuit à l'endroit, cas 3, sauf des cas errati- 
ques où j'ai pu voir un catalogue complet! 


Je passe sur les nombreuses mesures concernant 
tous les circuits, les échanges, le changement de modèle 
des condensateurs de filtrage etc... sans aucun résultat, 
sans trouver une explication, tous les tests donnant les 
résultats attendus. 


Avant de lire la suite, je suggère de marquer un 
temps d'arrêt et de reflexion sur les causes possibles car 
j'ai enfin trouvé... 


* La réponse à tous mes problèmes qui n'apporte pas 
la solution est que ces EPROM ont besoin pour fonctionner, 
de lumière. Oui, de lumière! La 2716 en veut plus que la 
2732.La 2716 cause le crash en fin de catalogue, la 
2732 causant les autres troubles, cas 1 ou 2 et j'ai: 

Pas de lumière ou très peu, cas 1. Un peu plus, cas 2. 
Encore un peu plus, cas 3 (assez de lumière pour la 2732). 
Eñfin suffisament de lumière pour la 2716 (lampe de 60 W 
à 50 cm), fonctionnement normal... enfin presque! 


* Ce qui reste, car il reste des problèmes: 
— XCAT ne marche que pour les ROM d'adresse inférieure à 
celle de l'EPROM. Pour Ll'EPROM et les ROM suivants,la 
machine renvoie le numéro sans rien faire d'autre(elle repond 
normalement NONEXISTANT quand il faut) 
— Quand je place une pause trop près d'une fonction de l'EPROM 

la machine fait une pause infinie, la distance à respecter 
dépendant de la fonction (distance nulk pour certaines). 


Detoutes façons; comme la fourniture de lumière 
ne fait pas partie des spécifications, ces EPROM ont l'air (!) 
déf ectueuses. 


Côté projets, le programmeur d'EPROM a bien avancé.. 
sur le papier. Programmation directe des 10 bits (2716 et 2732 
en parallèle) par une instruction WRITE ( la fonction X ROM 
suivie d'une boucle de temporisation) et EPROM directement 
utilisable sans la bouger (liaison bidirectionnelle), le test de 
la routine est immédiat. La RAM est presque inutile! 


Je vous tiendrais au courant. Pour ceux qui veulent 
monter un MLDL j'ai trou vé des 6504 (de 200 ns excusez du peu!) 
à 27 F TTC.Je n'ai trouvé ni 6116 ni 6132 à prix Honnête. 


Pour en revenir à mon problème avec mes EPROM, que 
puis-je faire? Moi qui avais prévu un double fond dans ma 
malette poufy loger le MLDL ! 


Enfin, il existe des 27C16 et 27C32, au moins 
chez N.5.cela eviterait d'envoyer des signaux à des circuits 
non alimentés (qui semblent bien Le supporter, contrairement 
aux CMOS). 


Les Eproms sont des animaux capricieux, en particulier 
le niveau de lecture dépend de l'appareil lecteur. Mon program- 
ateur vérifie chaque jeu d'éproms, je les "brûle" deux fois, 
je les essaie sur la machine avant de les envoyer, mais il 


y à encore parfois des problèmes. N'hésitez pas à m'en parler. 


LISSES, le 4 mai 1983 
AHHHHH. . i 


Cher Jean Daniel! 


loss amis s S at: 
'rvais termin$ le câblage de la partie RAM de mon “LDL 


ier soir ... et constatais un très mauvais résultat. En particulier 
‘vec des MEMORY LOST (volontaires) qui se plantaient avec l'affichage 
lassique au lieu d'afficher le SIZE 026 attendu, les essais n'étaient 
‘as facilités. Après une nuit de repos, les résultats n'étaient pas 
eilleurs ce matin, avec des plantages itératifs, même avec la RAM 
nhibée. 


Et puis le facteur m'a apporté un petit paquet contenant 
» jeu d'EFROM. Je me rue sur ma machine et... miracle, tout marche! 

Je fais un CAT 2 (sans lumière!) OK, un memory lost OK, 
ù 12 XCAT OK, et tout ça en ayant fermé la boite! Bref formidable! 


choisi, 


J'ai aussitôt purgé la RAM, enregistré ce qu'il faut, avec 
purge £ ] , 


une petite routine, et ça marche (après des problèmes de n° XROM mal 


la hôte m'ayant empêché de vérifier). 


Un grand merci, donc, mes problèmes étant règlés. Je vais 


pouvoir monter la partie programmateur d'EPROM, travailler sur un 
assembleur-éditeur, et finir mes capteurs nptiques (pour réaliser 

une base de chronométrage avec deux barrières optiques branchées sur 

le port d'entrée et le module TIME) la maquette me donne plus de trois 
mètres de portée, un temps de commutation de 200p{c'est long mais ça 
devrait aller)et des interruptions de faisceau de mois de 2 ms détectab 
Pour un chrono au 1/100 de s, ça devrait marcher... 


Anrèe la lecture du journal, je me suis précipité à la 


FNAC.. qui n'avait plus rien et vendait le module HP-IL 1160 F1! 


Jene me suis pas découragé et suis allé à la règle à calcul 


et y ai acheté un XM à 270 F et l' HP-IL à 270 F et OUI! je n'ai plus 
qu'a trouver un inter face vidéo... 
au bon prix! 


. dans mes prix, et un kit convertis; 


Bref je replonge de ce pas dans le MCODE avec un grand 


merci pour une réponse si rapide et si satisfaisante pour moi! 


Lisses, le 25 mai 1983 
Cher Jean Daniel 


D'abord des nouvelles de mon MLDL qui peuvent inte- 
resser Ceux qui en ont fait un et ceux qui veulent en faire un. 
Tout d'abord une négligence dans le shéma fait 
que les entrées des mémoires vives se retrouvent à certains 
moment "voyant" des sorties haute impédence, avec pour résul- 
tat une consommation faramineuse (plusieurs dizaines de milli- 
ampères) et des sèquelles dures quand j'ai laissé le circuit 
au repos pendant 24 heures (avant de m'ap#ercevoir de ce défaut) 
Fn effet, le lenderaiïn, le circuit était complètement bloqué. 
Après la lettre enthousiaste que j'avais envoyée, on devine 
mon désespoir! Je passe sur les étapes et donne la solution. 
Pour régler le problème des sorties haute impédance, 
il faut relier U6,15 et U7,15 au niveau haut (V+) quand on 
utilise des 6504 x 10. Dans le cas de la modification décrite 
par Chris Rath dans PPCCJ VIN4p25 et reproduite par Didier 
Jehl dans PPC-T4p28 et29, il suffit de relier DL8 et 9 à la 
masse par une résistance tire-bas, mais à 40 pA par résistance 
vois ètes prévenus! Une solution satisfaisante est plus complexe 
à trouver et je ne peux de toutes façons pas l'expérimenter. 
Mes 6504 sont des Harris de 200 nS (B6). D'autres 
modèles peuvent très bien supporter les choses. 


Ce n'est pas tout! Les EPROMS ne supportent pas, 
comme on pouvait s'y attendre, de recevoir des signaux sans 
être alimentées. Dans ces conditions, la broche 20 (OE) de 
ma 2732 consomme 100 pA et ne répond plus de rien si je laisse 
trainer. _ La solution: valider en permanence les sorties en 
reliant OE et CE de la 2716 et de la 2732 à la masse, en tampon- 
nant les sorties avec deux 4503 qui re-çoivent, eux, le signal 
de validation PROMO*. Seules les sorties de la 2732 doivent 
être tamponnées, celles de la 2716 étant tamponnées par U8, 
le 4052. 

Ces modifications faites, mon circuit consomme 
environ 1pA au repos, ce qui est correct et laisse du temps 
pour changer les piles (tous sélecteurs en position ouverte), 
opération rare avec une autonomie de ... 100 ans! Ceci pour 
dire que seule compte la durée de vie en stock dans le choix 
des piles. 


Le défaut de consommation du MLDL est semble-t-il un 
défaut d'origine, je ne suis pas compétent pour apprécier 
la valeur de la modification que tu propose, mais si ça marche 
pour toi... Je n'ai jamais eu de probléme d'usure de piles. 
IT faut dire que je sauve tout sur cassette. Je me contente 
de débrancher l'appareil quand je ne m'en sert pas. 


* _* 








Dans toute cette étude, nous considérerons 
le MLDL comme posé devant vous les eproms en haut (reconnais- 
sables à la fenêtre qu'elles ont sur le dessus, le commutateur 

gauche. 
Dans ce cas l'eprom 2732 doit être placée à 
la 2716 à gauche, leur repère en u en haut. 


droite et 


Le cordon de liaison est plaçé dans le support en bas 


(celui du milieu s'il y en a plusieurs). 


Pour fonctionner les eproms et le cordon de liaison doivent 
être en place et l'ensemble branché sur un port quelconque 
de la 41C. 


I1 faut savoir que: l'adresse des eproms dépend du port 
dans lequel le MLDL est branché et elles se trouvent à l'adresse 
haute de celui-ci (par exemple adresse F dans le port 4). 
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; : nootiioti se Upev ur à ET taire LIILETT upreur d SIX 
Canaux. Nous les numéroterons de 1 à 6 et de haut en bas, 
quelle que soit l'inscription qui est dessus. 


l'interrupteur n°1 (en haut) permet l'utilisation éven- 
tuelle d'une eprom 2732 à la place d'une 2716. Il est 
normalement OFF. 


l'interrupteur n°2 valide ou non la lecture de la mémoire 
vive. Quand il est sur OFF on peut y écrire mais pas 
la lire. Au premier branchement, si il n'y à pas eu 
d'initialisation, il doit être sur OFF. 

- les autres interrupteurs donnent l'adresse de la mémoire 
vive en binaire, le bit le plus significatif en haut, 
le moins significatif en bas. L'adresse 8 s'écrit donc 
de haut en bas ON OFF OFF OFF - 1 O0 0 O0 faites attention 
de ne pas utiliser une adresse déja occupée! 


Mise en route: 
Il vaut toujours mieux commencer 


avec une machine nue, 

sans aucun autre périphérique. 
les branchements faits, exécutez "GJRAM" ce qui nettoie 
tout le contenu de la mémoire vive, aléatoire à ce stade. 


Puis placer l'interrupteur 2 sur ON. C'est prêt. 


Remarque: même la HP sur OFF, le MLDL consomme du courant. 
Le débrancher quand on ne s'en sert pas est prudent. L'utilisa- 
tion pour le maintient de la mémoire de piles de 3V fait qu'elles 
s'usent peu. Pour changer les piles brancher le MLDL sur la 
41C (éteinte), celle ci prendra le relai (facultatif). 


N'oubliez pas, quand vous travaillez avec le MLDL que 
vous devez tenir à jour la partie catalogue (n°XROM, nombre 
de fonctions, adresse du point d'entrée, etc...) 


3 2% 
STANDARD 


Dans PPCJ V9 N3 Avril 1982 Paul Lind(6157) et Lynn Wilkins 
(7344) ont proposé un standard pour l'échange des programmes 
en microcode sur cartes magnétiques ou cassettes. 

IT s'agit de ranger 5 mots de 10 bits dans un seul 
de données, 
suivante 


registre 
sous forme de valeur alphanumérique de la façon 


10001xx|mot n{mot n+1|mot n+2/mot n+3|mot n+4| 


xx = n'importe quoi, les mots sont rangés dans le sens normal 
de lecture, bit Île plus significatif à gauche. 

Le premier registre du fichier ainsi constitué est un 
Chapeau qui donne les informations sur le fichier: 

digits: 1O0ORRRAAAANNN 


RRR= nombre total de registres dans le fichier, chapeau compris 
AAAA- adresse originale du premier mot du fichier) 

NNN nombre de mots moins 1 (ajouté à AAAA donne 
du dernier mot du fichier 

000 est libre pour l'instant. Il serait trés intéressant d'y 
mettre l'adresse du point d'entrée (par exemple en nombre 
de mots par rapport au début du fichier, 1 seul digit serait 
alors suffisant. Ceci permettrai d'écrire une routine en microco- 
de qui, d'une part mettrai sur cartes une routine microcode 
à partir de son nom (donné en alpha ou prompté), il suffirait 
de convenir d'un code de fin de routine (genre END à mettre 
comme dernier mot de la routine), et de permettre à la relecture 
la mise en place de la routine à la suite du contenu précédent 
du MLDL, avec mise à jour du catalogue automatique. Cela reste 
à écrire. 


l'adresse 


Par contre les routines mettant en application le standard 
de Lind et de Wilkins ont été données par ceux-ci et figurent 
dans le MLDL Opérating System. 


* * 


Différences entre MLDL et Protocoder 


Ces deux versions de simulateur sont disponibles en diffé- 
rentes versions. Leur différence essentielle est le mode d'écri- 
ture des instructions dans le simulateur (mémoire vive). 

Le MLDL tel que décrit pour la première fois dans PPCJ 
oar Lynn Wilkins et Paul Lind utilise une instruction inutilisée 
du microprocesseur de la 41C (un "NOP", le code 040) comme 
instructionde déclanchement du MLDL. Il faut donc pour utiliser 
cet appareil avoir disponible cette instruction, en général 
dans un lecteur d'eproms, d'où la nécessité d'adjoindre ce 
lecteur d'eproms au systéme ce qui accroit son coût. Mais 
ce lecteur peut contenir bien plus que cette seule instruction. 

Le Protocoder utilise une instruction peu utilisée de 
la HP (SIGN) pour activer la RAM. Il n'est alors plus besoin 
de lecteur d'eproms, mais gare aux réactions si un SIGN passe 
dans Île programme. Les accidents sont évités par le contrôle 


d'un DIT particulier qui doit être présent en X et qui né 
peut exister que dans un Nombre Non Normalise. 
Chaque système à ses partisants. 


* _*% 


LE MLDL OPERATING SYSTEM 


Les eproms MLDL OS livrées avec le MLHL de PPC-T ont 
un numéro XROM de 04 {celui du module finance, attention!). 


Elles ont été mises en place par Didier Jehl et Janick 
Taillandier. 

Les fonctions de  BCDBIN à  DECODE, ainsi 

que DIS,XCAT, sont celles de TOULROM (avec 


des numéros XROM différents, attention!). 
Elles ont été décrites dans PPC-T. 


MNEM, DISASM, PROMT, "LIST" fournissent 

un désassembleur en microcode avec, hélas, 

. les mnémoniques HP et sont dues à Nelson 

Croule, Le fabriquant du Protocoder. Le nom "LIST" est trés 


mal choisi et il faut être astucieux pour utiliser La fonction. 
En effet elle nécessite l'imprimante et XEQ ‘'LIST" vous branche 
sur Le programme standard de l'imprimante. IL faut: 1) débrancher 
l'imprimante; 2) brancher Le MLDL; 3) faire ASN "LIST" XX. 
On peut ensuite rebrancher l'imprimante et utiliser La touche 
assignée pour obtenir LIST - - = — . Répondre en pressant 
Les touches qui donnent en hexadécimal L'adresse où doit commen- 
cer La liste (ne pas passer par atpha). 

ORAM efface complètement Le MLDL (partie RAM). 

"LOAD"" permet de remplir La RAM du MLDL. XEQ ‘'LOAD'"' vous 
demande l'adresse de début de chargement en hexadécimal (presser 
simplement Les touches 0-9 et A-F sans autre formalité). La 
HP affiche alors l'adresse suivie du code préexistant à cette 
adresse, puis trois tirets qui vous invitent à fournir un 
code. Ce code fourni (code 244) l'adresse suivante est affichée 
de La même façon. 


Voyons maintenant Les instructions fournies à L'origine 
par l'auteur du MLDL, Lynn Wilkins (7344) et publiées dans 
PPCJ CUS) VON3S Avril 1982 
ROM>X Etant donnée une adresse hexadécimale dans Les 16 
bits de droite de X (obtenue par CODE ou ‘‘’HN'') retourne 
en X Les 10 bits du mot du ROM. L'adresse est présente 
en L incrémentée de 1. 

X>ROM Etant donnée en X une adresse de 16 bits + un mot 
de 10 bits (Cle tout obtenu par CODE), écrit Le code 
à l'adresse indiquée. Pas d'incrément en L. 

X>A Met en alpha (à gauche) Le caractère dont Le code 
est en x 

ROM>REG Crée un fichier de données dans Les registres de 
La 41C au format indiqué plus haut. 

Le numéro de premier registre doit être 
en x et un nombre hexadécimal BBBBEEEE où BBBB est 
l'adresse du premier mot du microcode et EEEE l'adresse 
du dernier. En fin de travail Last X contient Le 
numéro du dernier registre utilisé, Le reste de 
La pile n'est pas modifié. S'il n'y a pas assez 
de registres disponibles Le programme s'arrète sur 
NONEXISTENT. 

REG>ROM Met dans Le MLDL Le contenu des registres. Avant 
l'exécution, X doit contenir Le numéro du premier 


registre de données, Y contenant l'adresse de 
chargement du microcode: 
— si y=000 Le fichier est chargé à L'adresse d'où il 
a été Lu | 
— Si y = 0001 à O00F, Le fichier est chargé dans La page 


dont Le numéro est aïnsi donné, à son emplacement d'origi- 
ne. 

— Si y = 0010 à 
de cette adresse. 


FFFF, Le fichier est chargé à partir 


Le catalogue du ROM, Les XEQ et GTO sont à adapter par 


vous même. 


Cher M, DCDIK 


Dans le dernier numéro du journal j'ai lu que 
Jean-Christorhe BENCIST 2 écrit un programme sur 
TRS &O 
J'ai 


j'ai 


ruor simuler le microrrocesseur de la HP. 
essay® de faire la même chose sauf que 
essayé directement sur la 41.D'où le prem 
qui accompagne cette lettre.J'espère que vous 
vourrez l'imprimer et le publier car il tient 
tout juste dans ma 41 munie de ? modules de mev 


Far cette voie il pourrais etre amélioré et r‘- 
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FULL FermelLant ainsi d'inclure d'autres ordres 
du microrrocesseur, 
Four l'instant en effet c'est pas tellement 
l'idéal pour construire 5es routines en micro- 
code car voici ses (nombreuses)limitations: 
I1 ne peut manier que les registres sui- 
vants du microprocesseur C A B MNPQRST 
et le carry qui correspondent aux mémoires 
09 à 18 de la machine. Les mémoires 00 à04 
rerrésentent la pile dans L'ordré: T2 TXL 
Quant aux mémoires 05 à 08 elles étaient censées 
représenter le registre Alpha mais malheureu- 
Sement un AVIEW ne les montre pas 
L'éditeur est des plus simples: SST BST on 
remplace un pas par un autre par écrasement il 
n'y a pas d'insertion 
La memoire programme est limitée à 50 pas 
qui sont en fait les mémoires 20 à 70 
Tous les ordres du microprocesseur ne sont 
pas disponibles,loin de lè,je les détaillerai 
après vous avoir expliqué le fonctionnement du 
programme 
1) on fait XEQ"MICRO-C" et on voit MOTS ? 
2) on rentre alors un moté en code 442 et on fait 
R/S= même message,on tape le second mot etc... 
3) lorsque le programme est entièrement tapé on 
appuie sur R/S sans rien répondre à l'interroga- 
tion et le programme s'exécute 
4) au bout d'un temps plus ou moins long on peut 
regarder l'effet du prem sur les registres que 
j'ai décrits plus haut 
5) si on veut faire défiler le prgm on tape 
XEQ "LIST" et on voit le numéro du pasainsi 
que le code qu'il contient 
Pour avancer: XEQ "PAV" 
POUR reculer: XEQ "PAR" 
Et voilà pour le fonctionnement.Voyons mainte- 
nant le décorticage 
LE PROGRAMME MICRO-C 
1-3: initialisation 
4-13: introduction des codes &Le 
14-18: mise en place du pointeur!" dans le 
registre 19 
19-kk:décomposition du code courant et stoc- 
kage dans R71 R72 et R73 
45-51: incrémentation du pointeur, si on n'est 
pas à la fin du prgm on saute au LBL O2 
de la ligne 19, sinon on affiche 
TERMINE pour faire savoir à l'utilisateur 
que le boulot est fini 
LE PROGRAMME g 
11 iñterprète les instructions dont les e bits 
de droite sont à zéro 
2-3: on traduit le paramètre en décimal 
5-6: on décode l'instruction 
7: on exécute l'instruction, le paramètre est 
en R73 
8: c'est fini on revient au prgm MICRO-C pour 
l'instruction suivante 
à partir de la ligne 9 ce sont les di fférentes 
fonctions de type @ que 1e prem comprend 
LE PROGRAMME 1 
I1 devait interpréter les fonctions de type 1 
mais le manque de place fait qu'il se compose 


uniquement du label global se 


LE PROGRAMME 2 
Il interpréte les fonctions de type 2 
1-7:on traduit le parametre on le range en R73 


et on fait la mème chose pour l'instruction 
8-18: on récupère le > eme bit de l'instruction 


et on retraduit en décimal 
19-27: on spécifie Le Champ mais faute de placd 
il sera toujours de 3 c'est à dire ALL 
28: on exécute l'instruction 
29: on revient à MICRO-C 
à partir de la ligne 30 ce sont les instruc- 
tions de type 2 
LE PROGRAMME 3 
I1 s'occupe des sauts relatifs 
1-7: on traduit en décimal bien sûr 
8-27: on calcule la longueur du saut 
28-30: on détermine la condition: JNC ou JC 
31: on VA au label ainsi déterminé 
32-40: cas où C-0.0n vérifie que la condi- 
tion est réalisée 
si oui on laisse la longueur du saut in- 
tacte enR71 
sinon on la met à zéro 
dans les 2 cas on saute à l'étiquette 2 
41-48: cas où C=1.0N agit de la même façon 
49-54: on rapelle la Valeur du saut 
Si F15 est baissé il s'agit d'un saut po=— 
sitif on ajoute R71 à R19 
Si F15 est levé on le baisse et on retran- 
che R71 de R19 
55: on retourne à MICRO-C 
LE PROGRAYME LC 
I1 traduit un caractère alphabétique en décimal 
LEPROGRA"ME LIST 
I1 montre la 1ère ligne du prgm entré 
LE PROGRAMME PAV 
11 montre la ligne suivante 
LE PROGRAMME PAR 
I1 montre la ligne précédente 


Voyons maintenant les ordres compris 
ORDRES DE TYPE ÿ 


NOP 

CLRF- SETF- ?FSET 

?R- 

CATEGORIE 6/0 

Tous sauf T-ST ST-T ST()T Méfiance cependant car 
les flags ne sont pas levés en conséquence 
R- 

WRIT 

READ 

CATEGORIE 8/0 

SLCT P SLCT Q ?2F-Q A-B-C-0 

CATEGORIE C/O 

N=C C=N C()N 


ORD?ES DE TYPE 2 
Tous sauf RSHFA RSHFB RSHFC LSHFA 


ORDRES DE TYFE 3 
Tous 


Et voilà vous savez tout «Pendant que j'y suis 
je voudrais poser une question: 

Pourrait-on creer un module Style Maths ‘PC-Rom 
ou autre grace auquel on pourrais programmer en 
microcode soit dans la HP en lui faisant croire 
que Sa MEV est une “EM soit dans le module lui- 
méme qui serait comme un MLDL ? 

Où peut on se procurer un labo pas trop cher pour 
un étudiant ? 

Dans PPCT N° 4 les dernières pages en décrivent 
un: peut on se le procurer dans le club ? Si oui 
à quel prix ? 

Merci puor tout d'avance 


Nolin latrice T263 
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Cid: 
85 28 
63 AK 


AdeiEL Hé 

45 “NOT ?° 

46 CF 23 

#7 STOF 

88 FC? 23 

89 GTO &! 
18 ASTO IND x 

11 156 

{2 CET 

13 GTO 64 


14eLBL "RUN" 
156LFL 41 
16 AOFF 

17 28 

18 5T0 13 


19eLBL 42 
284 CLA 
21 ARCL INN 19 


224LEL 44 
23 *“+H” 
24 RCL : 
25 Xx=8? 
26 GTO 44 
ê? ; 
28 XCD 
29 *+}" 
36 , 
31 XD 
32 “+H" 
33 REL * 
34 RDK 
35 CLA 
36 STO [ 
37 ASTO 78 
38 RIH 
39 STO I 
48 ASTO 73 
ai Rt 
42 Ft 
43 STÜ ! 
44 ASTO 71 
45 KEG INDE 71 
46 ISG 13 
47 
48 RCL IND 19 
49 SF 25 
CRT 
51 GTO 42 
Je “TERMINE" 
53 PROMPT 


J4+LBL "A" 
93 RCL 73 
96 EE "L 
S7 ST0 73 
98 RCL 72 
99 &E& "LC" 

68 KEG IND À 
61 RTK 


62+LEL 68 
63 RTH 


64eLBL &i 
65 CF IHD 7: 
66 RTH 


674LBL 42 
68 SF IND 73 
69 RTH 


78+LEL A3 
718 

22 F5? IND 
73 1 
74 ST ÏE 
73 RTH 


76eLBL 45 
77 RCL #3 
78 RCL IND 6 

79 Xx=1? 
88 SF 15 
81 8 

Ra FS?C 15 
83 1 

84 STG {5 
85 RTH 


B6eLEL &6 
87 REL ?3 


86 26 
89 + 


98 KEG IND 


St RTH 


93eLBL 25 
93 RCL 49 
94 STO 12 
95 RTH 


J6eLBL 2 
97 RL 1 
96 STD 4 
939 RTH 


LBBeLEL 27 
181 REL 15 
142 xé ga 
143 570 12 
14 RTH 


185eLEL 33 
146 RCL 43 
187 LÜG 
188 INT 
189 STO 17 
118 RTH 


111+LEL 34 
112 RCL 49 
113 LOG 
114 FRC 
115 RCL 17 
116 + 

117 14tX 
118 STD 49 
119 RTH 


1286LEL 3 
121 RCL ! 
122 RCL 8 
123 LOG 
124 IHT 
125 5T- L 
126 STO 17 
127 463T 
128 ST+ L 
129 LASTX 
138 18t* 
131 5T0 89 
132 RTH 


133+LBL 47 
134 RCL F3 


135 STO IND 16 


136 RTH 


137+LBL 46 
138 RCL 73 
139 4f 

144 + 
141 XEG INI 
142 RTH 


1436LEL 42 
144 i4 

145 STG jé 
146 RTK 


147eLBL 43 
148 15 

149 STO 16 
158 RTK 


1514LBL 44 
152 RCL {4 
153 RCL 15 
154 K=v? 
159 SF 15 
156 4 

157 FS9C 15 
158 1 

159 STO 18 
168 RTH 


161eLEL dé 
162 ; 

163 STO 49 
164 STO 14 
165 STO 11 
166 RTN 


167eLEL 18 
168 RCL 49 


169 STO INR 7: 


1784 RTR 


171eLBL 13 


ru 


172 RCL F3 
173 68 

14 + 

#3 XEG IHI 
176 RTN 


>< 


IFreiEi 61 
178 RC 49 
179 STG 13 
188 RTH 


IS81eLEL 62 
182 REL 13 
183 STO A9 
184 RTH 


185eLEL 63 
186 RCL 43 
187 4{> 13 
188 STD 49 
189 RTH 


198+LBL 14 


191 RCL IND 73 


192 STO 49 
193 RTK 


194+LBL “1° 
195+LBL 2" 
196 RCL 73 
197 KE@ “LC* 
198 STO 73 
199 RCL 72 
288 XEB “LC” 
241 STO 72 
282 8 

243 RC=1? 
284 5F 15 
285 À 

246 F5?C 15 
287 1 

288 RCL 73 
289 2 

214 * 

211 + 

èle STO 73 
2138 

214 RCL 72 
215 x?? 
216 - 

817 N=T? 
218 - 

219 48 

228 + 

221 ST 72 


222 KE@ IND 73 


223 RTH 


224eLBL 66 
885 : 

226 5TG 184 
227 RTH 


228+LBL 81 
229 ; 

238 STÜ {1 
231 RTN 


2326LBL 82 
833 ; 

234 STG 49 
235 RTK 


236eLBL 43 
237 REL 1 
238 4C> 1B 
239 STO 11 
248 RTH 


241eiBL G4 
242 RCL 18 
243 STO 11 
244 RTH 


245+LBL 45 
246 RCL 49 
ë47 K€: 18 
248 ST0 49 
249 RTH 


258+LEL 46 
241 RC 11 
232 STG 46 
233 RTN 


254eLBL 4° 
2593 RCL 11 
256 KÇ: 49 


237 STÜ 
238 RTH 


239+LBL 
268 RCE 
261 STO 
262 RTH 


2634LEL 
é64 REL 
263 5T+ 
266 RTH 


267LBL 
268 RCL 
269 5T+ 
278 RTK 


2716LBL 
272 IG 
273" 

874 RTH 


2795eLBL 
276 REL 
27? ST- 
278 RTN 


279eLBL 
288 1 

281 ST- 
282 RTH 


283eLBL 
284 REL 
285 ST- 
286 RTH 


287eLEL 
288 RCi 
289 ST+ 
294 RTH 


291+LBL 
292 RCL 
293 ST+ 
294 RTH 


295+LBL 
296 ISG 
297 ”* 

298 RTK 


299eLBL 
388 RCL 
341 RCL 
342 - 

383 STÜ 
3%4 RTK 


345eLBL 
386 DSE 
347 

348 RTK 


309+LBL : 


314 -i 
314 ST« 
312 RTH 


3136LBi 
314 RCL 
315 CHS 
316 1 

317 - 

316 ST 
319 RTH 


3286LEL 

321 RCL 

322 X#ÿ° 
323 5F { 
324 à 


325 FS?C 15 


326 1 
327 STÙ 
328 RTH 


329eLEL 
338 RCL 
331 k*4? 
332 SF 1 
333 8 


334 FS?C 15 


339 | 
336 ST 
337 RTN 


HE 
83 
16 


43 
ii 
14 


83 
ig 


ii 
18 


14 
83 
18 


15 
CE] 
83 


16 
18 
LE) 


18 
14 
43 


22 


11 
5 

18 
23 
CE 


5 


18 


J36eL6L 4 
339 RCi 4 
348 RCL 14 
J41 iv? 
342 SF is 
343 4 

344 FS?C 15 
345 ! 

346 STO 18 
347 RTN 


348eLBL 25 
349 RCL 11 
394 REL 16 
391 R€Y? 
352 SF 15 
353 8 

34 F62C 15 
355 1 

356 570 16 
337 RTH 


358+LBL 26 
359 RCL {8 
368 +47 
361 SF 15 
362 4 

363 FS7C 15 
364 1 

365 ST0 18 
366 RTH 


367+LEL 27 
368 RCL 18 
369 RCL 49 
374 K#Y? 
371 SF 15 
372 Q 

373 FS?C 15 
374 1 

373 STO 18 


376eLBL *“3" 
377 RCL 73 
378 KEG “LC* 
379 STO 73 
384 REL 72 
381 XEG “LC* 
382 STÜ 72 
383 2 

384 / 

385 INT 
386 STO ?1 
387 REL 73 
388 8 

389 XCv? 
398 SF 15 
391 X<Y? 
392 - 

393 FC? 15 
394 RDK 
395 8 

396 * 

397 ST+ 71 
398 64 

399 REL 71 
488 F5? 15 
agi - 

482 STQ 71 
483 RÉEL 72 
4ñ4 2 

445 NOT 
496 GTO IHD 4 


447+LBL 48 
488 RCL 18 
449 x=0°? 
418 SF 16 
4il ; 

412 FS?C 16 
413 REL 71 
414 STG 71 
415 GTO 42 


4169iBL 41 
417 RCL 18 
418 x+ÿ7? 
419 SF {6 
428 , 

421 FS7C 16 
422 REL ?1 
423 ST0 71 


424eLBL 42 
425 REL ?1 
426 FC? 15 
427 ST+ 19 
PRIE 
JUILLET AQt 


1AS7 pr 


T Hors 


* 


428 FS?C 15 A4Ë xt 456 “+” 478 GIü 44 
429 ST- 19 443 RTK 457 ARCL INDE ri 
444 458 PROMPI 471eLEL I 
43GeLEL “LC” 445 - 472 HON 
431 SF 25 2 459eLBL “PAY" 473 STOF 
432 CLA 446eLBL "LIST" 468 156 ?2 474 AOFF 
433 ARCL * 447 20 41 475 ASTO IN 7: 
434 “Htt600" 448 STE 71 462 ISG 71 476 RCL INN 71 
435 RL 443 1 463 “- 457 XEQ “LC- 
4% E? 458 STG 7E 464 GTO 44 478 X#ÿ°? 
437 x Al 479 GTO “PAY* 
439 - 466 DSE 72 481 STO IHD 71 
446 16 4539LEL 44 467 482 GTO “PAY” 
441 KO 454 CLA 468 DSE 71 483 END. 
455 ARCL 72 469 *” 
Marc Chiffoleau (9710-1189) 22.03.83 
8 rue Auber 
59046 Lille 
Cher Jean-Daniel, 

Je te fais parvenir une modification de ton programme 
assembleur paru dans "Au fond" page 97. Je l'ai modifié pot 
pour pouvoir entrer directement en ALPHA les numériques PPC: 
ce qui nécessite un "petit" fichier ASCII ( 110 REG). Pour 
la seconde partie, j'ai carrément pompé ton programme ! Ci- 
joint la liste du Programme et du fichier ASCII. Les ligne: 
206 et 207 sont en Hexa : 

-_ FF0E0C08410102050A040903060D0B07 
- F10F 

En insérant une routine entre 247 et 248, on devrai: 
pouvoir programmer un MLDL en utilisant directement les numéri 
ques ? À ceux qui en ont un d'en faire la preuve. 

PPC Ro required 
ALeLEL “He : SL XCT? 136 16 , 
go gag LB 71 92 GTO IS 137 STO 86 sp 
93 CLE 48 64 93 RON 138 XEQ “BD 
6 47 44 128 139 256 as 
HE 95 KO 146 XEO -0R nt 
45 XEË 62 — s2 "0R° 
Gé GETREC LL FE 96 FS?C #1 141 KEG 18 es 
7 ps sl FC? &? 47 = 142 { 189 POST : 
: J2 128 98 32 143 + 198 PROMPT 
B8 RC T  s3 po? g7 = 191 16 
89 CLR ne Pue mf 99 KEQ *GR* 144 KEB IND # (02 NOD 
18 STG [ +. 148 KEQ IND Y 145 ASTG @1 
LE et e r4 194 4 
12 ets 36 REG 61 192 REG “GR 147 RDK Lo Mu 
13 CLR S7 SF UT 183 EG INDY 148 RDK So LTD sù 
4 STO [ 38 GTD 48 184 2 149 KEG 18 197 PIN 
185 + 158 RTK 
15 GT 48 coup) «pss- | 198 14 
=? 
gout 69 CF 68 187 KOY ISLLBL E er 
SU IST ADR" {gg FG?C 68 152 KEG 99 
17 CF 87 s É 99 ; 
18 CLA 
.. 63 XEG 63 154 282 14 
8 co dg 016 (its 155 XEQ 62 
65 ST 46 2 3 284 GTO 58 
be MS 156 16 85 NE 2 
5 1 2 … 
PLEL D g71 SUITE Me oo rriitend ét: 
22 “Hp” Aa 158 “POST 287 “H” 
23 KEQ 68 . 1t4eLBL F 159 XEQ 64 
69 STO dk ï 3 ; 288 3 
24 QE 115 XEG 17 168 XEQ 62 Nav 
, 76 12288 (16 161 4 289 K=v7 
25 ATOX us ’ 216 CLA 
26 #3V7 PI R2Y? 117 GTÜ 28 162 - 
ê6 #>Y° nri + 
use 78 GT0 19 163 CLA 211 RDK 
27 GO 70 736 @6 ; | 212 AROT 
28 62 ; 1186LEL G 164 %€2Y 213 ATOS 
20 V9 T4eLEL 5% 128 ! 166 KEG “QR” 1 #2 
34 KT? a7 ÿ 215 RDH 
31 TO 71 . + 121 GTO 28 167 KEG IHD Y 
39 31 Ÿ 168 KT ; 
33 LO 778 122LBL H 169 RDN Le . # 
F 78 SEEKPTA ) ? 179 8 
74 RDV? 123 REG Li 218 XOY 
0 79 RTR 124 2 171 + 
35 GTO 72 219 CLA 
36 13 125 GTG 28 172 + 220 YEG 16 
si 88+LEL D 173 4 6 
ge HT 81 SF 88 21 , 
38 #29 126411 I 174 KEG “QR” 
ner 127 KEG 17 175 XEG IND Ÿ 
F | g2eLBL C 283  17%64 ne " 
+ f7 à 
41 GO 72 gg Suppegs ve 127 670 20 Je 224 KEQ IHD # 
x l 225 FC? 86 
goupe 70 PS PROMPT  j3gelBl 17 179 CTO 26 206. CTQ 46 
43 16 HR 181 CF 67 227 ASTO X 
44 MOI 87 KCU° 132 SF 6 188+LBL A 228 #O OI 
, 88 SF 41 cHanée 81 NEC 9 
45 128 : 133 “ADRS 1 ” 229 CLR 
29 A5 134 KEG 64 182 “PREF- 
46 + 96 63 V2S NFO 63 183 XEQ 60 238 ARCL À 


2316LBL 48 
232 156 48 
33 DEG 


239 KEG “QF" 
244 &EË IND 
241 16 

242 KEG OR“ 
243 KES IND * 
244 XEG IHD * 
245 E * 


286 FDKH 

267 16 

268 * 

269 + 

e7h 4 

èv1 &EG “OP” 


272 KEG IHD 


873 à 
êr4 * 
275 RTH 


276+LPL 48 
art "Hg" 
278 RTH 


e79eLBL Al 


246 3 


247 ART 
248 AYIEH 


249 FC? 
258 GCTO 


43 
65 


251 FC?C 86 
252 STOP 
253 GETKEY 


254 CLA 


233 ARCL A1 
256 GTO 48 


237eLBL 
258 16 


18 


299 XE8 “DR” 


268 KC3Y 


2616LEL 16 


262 4 


263 XEB “GR” 
264 XEG [ND 


263 XC5Y 


288 “+{" 
281 RTH 


282eLEL 42 
283 +2" 
284 RTH 


2856LFL 63 
286 "+3" 
287 RTH 


2886LEL A4 
289 "+4" 
298 RTN 


291+LEL A5 
292 "+5" 
293 RTH 


294+LBL 
295 "+6" 
296 RTK 


2976LEi 47 
298 +?" 
299 RTK 


FAB+LEL 6 
31 “+6” 
342 RTK 


3A3eLEL 09 
384 “+3" 
345 RTH 


386+LEL 18 
347 Ha" 
388 RTH 


349+LBL 11 
318 “HE” 
AL RTH 


3124LBL 12 
313 "+C" 
314 RTH 


3159L8L 13 
316 “HD” 
317 RTH 


318eLBL 14 
319 °HE" 
324 RTH 


Z219LEL 15 
32 “HF 
323 RIN 


3246LBL 68 
35 “+ 7° 
326 AOK 


LISTE DU FICHIER ASCII POUR "ASS" 
© 2 


"NOP" 
“CLRF" 
SET" 
NESET?" 
“LDaR-" 
"?R=" 
"R= " 
nzn 
SELP" 
"WRIT" 
Apr" 
“ze 
AL 
"READ" 
"RCR" 
"A =" 
"B=f" 
"C=p" 
“"A<>B" 
"B=A" 
np <> 
"C=B" 
"C<>B" 
“A=C" 
A =A+R" 
"A=A4C" 
"A=A41" 
"A=A-B" 
"A=A-l" 
TA =A-C" 
“"C=C+A" 
"C=C+1" 
"C=A-C" 
"C=C-1" 
"C=p-C" 
VC==C-L" 
"2B#0" 
"?CHh" 
“"?A4C" 
"?A<B" 
"7A F9" 
“?A $C" 
"RSHFA" 
"RSHFB" 
""RSHFC" 
“LSHFA" 
"ar" 
"SbX" 
"R<" 
“YDLr 
“p-Q" 
"xs" 

"M" 

"MS" 


<€--ATTENTION:N 





327 STOP 
328 AFF 
329 RTH 


338eLBL 61 
331 256 

332 XEQ "Gr" 
333 XE@ IN * 
334 i6 

335 KEG “@F" 
336 XEQ IHD 
337 KEG IND * 
338 RTK 


339eLBL 62 
348 POSFL 
341 #4? 
342 x247? 
343 RTN 
"SYHTAX ERF" 
345 PROMPT 


34 


2 


346LBL 63 
342 ALENG 
348 4 

349 K=v? 
358 RTH 


351LBL 19 
352 “ADR ERF”" 
333 PRONPT 


394eLBL 65 
335 “LOAÏ ERR” 
356 PROMPT 
357 .END. 


ENT (AF1R) 


Pour des commodités d'affichage, 
certaines syntaxes ont été modi 
fiées: 
- a remplace @ . 
— + remplace & 





"ST=f3C4" 
"CLRKEY3C8R" 
"?KEY3CC" 
"R=R-13D4" 
"R=R+13DC" 
"G=CYS8" 
"C=Gp98" 
"CoGfDe" 
"M=C158" 
"C=ML98" 
"C<>MIDR" 
"T=ST258" 
"ST=T298" 
"ST<>T2D8** 
"ST=C358" 
"C=ST398" 
"C<> ST3D8" 
"xQ-Go042@" 
“POWOFF #6 @"" 
"SLCTPSAQ" 
"SLCTQNEP"" 
“?P=Q12@" 


PONT Srrn a mer due 
+ LIU NUN 1 & UV 


"A=B=C=@11@" 
"GATOADRLEY" 
"C=KEY220" 
"SETHEX26@" 
"SETDEC2A@" 
"DSPOFF2Ef" 
"DSPTOG32/" 
"RIN3Ef" 
"?CRTN369" 
"?NCRTN3A gi" 
"N=CN70" 
"CENNBEG" 
"CCD NOFO" 
“LDI130" 
“"PUSH17g" 
“"POPLEBD" 
"GOTOKEY23@" 
""RAMSLCT2 7@" 
"KRITED2Fg" 
“FETCH339" 
“C=CORA 379" 
“"C=CANDA 3BY" 
"PRPHSLCT3F({" 


e pas oublier l'espace! 








NP 45 


HP-75 HP-75 HP-75 HP-75 HP-75 HP-75 HP-75 HP-75 


Mon intention, à partir de ce numéro de PPCT, est de 
créer une rubrique aussi régulière que possible, consa- 
crée au HP-75, Rassurons tout de suite les fanatiques 
de la HP-H1, je n'ai pas l'intention de prendre un es- 
pace considérable dans le journal avec du BASIC où au- 
tre (ce qui laissera toute la place voulue aux articles 
sur le BYTE GRABBER, CRIC et autre WT, qui constituent 
bien entendu, la caractéristique fondamentale du HP-41 


(?)). 


I1 me parait toutefois intéressant de vous faire 
connaitre ce qui existe dans le domaine logiciel et 
matériel sur cette machine, c'est ainsi que je vous 
présenterai les nouveaux modules ou logiciels (HP ou 
non) au fur et à mesure de leur parution et si, bien 
entendu, il m'est possible de les essayer car il est 
peu vraisemblable que je les achète tous (le 75 est 
déjà assez cher comme cela). De même, vous pouvez vous 
attendre à avoir des articles sur l'architecture de la 
machine. 


Au menu de ce premier numéro, vous trouverez: 


- FORTH sur le HP-75, 

- un résumé des performances du 75 comparées avec 
d'autres machines BASIC, 

- un petit programme-maison. 


Comme Jean-Daniel a eu l'occasion de vous le faire 
connaitre par une des dernières circulaires, des Améri- 
cains ont mis au point un interpréteur FORTH pour le 
15. J'ai commandé aux USA, et j'ai beaucoup de mérite 
car une telle opération est vraiment devenue difficile 
pour les particuliers, la version "commercialisée" du 


produit (V1.00). Cette version, a priori, ne devrait 
pas avoir de bugs majeurs, et est accompagnée d'une 
documentation. Il existe toutefois dans la nature une 


version précédente (VO.02) et j'ai demandé aux auteurs 
l'autorisation de la donner à ceux qui m'en ferait la 
demande* Cette version de développement n'est ni com- 
plète ni juste et vient sans documentation, elle peut 
toutefois constituer pour les personnes interessées une 
bonne introduction. Si vous la voulez, faites moi par- 
venir une cassette ou 11 cartes et je vous l'enverrai 
dès que possible. Le logiciel complet coûte $165 et 
peut être commandé à l'adresse suivante: 

FORTH Age Products # RE FUSEZ 

Suite 213 x 
23 Altarinda Road 
ORINDA, California 


X # +*# 


La revue DECISION INFORMATIQUE du 10 Janvier 1983 a 
publié un banc d'essai du HP-75 très intéressant, dans 
lequel un certain nombre de programmes test (benchmark 
simplifié) ont été essayés sur diverses machines; ceci 
complète l'étude similaire parue dans le Calculator 
Journal de PPC en Août dernier: 

IBM PC 


Apple II HP-75 


10 FOR I=1 TO 5000 6.7 sec 6.4 sec 12.5 sec 


20 NEXT I 

10 A=2.71828 29 sec 23.8 sec 55 sec 

20 B=3.14159 

30 FOR 1=1 TO 5000 

4O C=B/A 

50 NEXT I 

10 A=2.71828 13.9 sec 12.4 sec 28 sec 

20 B=3.14159 

30 FOR I1=1 TO 5000 

HO GOSUB 1000 

50 NEXT I 

1000 RETURN 

10 A$ = 32.3 sec 23 sec H7 sec 
"abcdefghijklm" 

20 FOR I=1 TO 5000 

30 B$=MID$(A$,6,6) (1) 

HO NEXT I 


(1) remplacé sur le 75 par B$-=A$(6,12). 


PPC-T Noëg 
JUILLET AOUT 
1983 p282e 


Résultats vraiment excellents puisque le rapport de 
vitesses 75 / IBM PC n'est que de 2.17. Des tests simi- 
laires étaient conduits avec des micros portables, les 
résultats cumulés donnaient : 


Sharp 1211: 22 mn 27 sec. (21.05) 
Sharp 1500: 4 mn 54 sec. (4.59) 
Casio FX702P: 7 mn 43 sec. (7.23) 
HP-75C: 1 mn O4 sec. (1.00) 


Reste, bien entendu, à relativiser ces tests par des 
critères de coût, de précision de calculs etc... . Par 
ailleurs il est vraisemblable que l' Apple II et 
l'IBM PC utilisaient un interpréteur et non un 
compilateur. 


# # # 


Pour conclure, le petit programme annoncé. Il s'agit 
d'une reprise du programme IG du PPC ROM, (Voir manuel 
P. 220 et suivantes) de calculs d'intégrales et permet 
d'illustrer très bien les avantages et inconvénients du 
BASIC et de la notation polonaise. 

Le BASIC est sans commune mesure plus facile à ecrire, 


s 


a mettre au point, et à maintenir: ce programme a éte 
écrit en un peu moins d'une heure à un moment où le 
BASIC était pour moi une nouveauté, et il est d'une 
grande lisibilité puisque les variables ont le même nom 
que dans l'algorithme rapellé plus loin; par ailleurs 
la fonction à intégrer est donnée "en clair" à la ligne 
230. En revanche il est très gourmand en mémoire: avec 
la fonction SRQ(X)/(X-1) - 1/LN(X) » il faut très exac- 
tement 2381 octets (programme + variables). Le program- 
me est relativement rapide (c'est à dire beaucoup plus 
qu'une 1 et beaucoup moins qu'un IBM 370/168), moins 
toutefois que la fonction similaire, en assembleur, 
prévue dans le module Mathématiques (à sortir à 
l'automne si l'on en croit HP). 


T1 = Limite M(k,k) k=1,2,3,.. avec: 


k + 00 
Up = -1 + 2-k 

uj = uÿ_ + 21-k 

Xi = ((b-a)/Hu;(3 - uj 2) + (b + a)/2 
So = f((a + b)/2) 

Sx = 2f(x;)(1-ui 2) + S xs 


M(k,0) = (3(b-a)/4)#2-ka5, 
M(k,j) = M(k,j-1) + (M(k,j-19-M(k-1,j-1))/(43-1) 


Ceci termine ce premier article; encore une fois, 
j'invite les possesseurs d'un 75 à me contacter (ceci 
permettera, entre autre, de connaitre la taille du 
"marché" du ROM danois, si celui-ci voit le jour) et/ou 
à me transmettre leurs articles et autres programmes, 
ceci évitera également de fairé de cette colonne un 


monologue! 


J. TAILLANDIER T8/7451 
9 Rue DELEZENNE 

59000 LILLE 

(20) 93-78-60 


138 SCK)=SCK)+C1-UrLD#FH 
YCCB-RhelleC3-Uxl)/4+68+0 


INTEGP B 734 287 )/2) 

AIS NET 148 V=U+22C1-K) À U=V 
154 HEXT I 

1A DIM Mé2;12),5612 164 MCK,4)=3#(B-AaSiFi# 

28 FOR I=A TO 12 @ FDF 2A(-K)/4 


=@ TO 12 À MCI,J)=8 & KE 
KT JR HEXT I 

384 INPUT ‘Limites A,E7 : 
AP 

48 INPUT ‘Precision? ‘ 
L'eDISF:': 

68 SCA)=FNYCCA+B)/2 à 

74 MCR.A}=34CB-1a5 CAN: 4 
88 FOR K=1 T0 12 & DISF 
K:HCK-LK-1ù 

184 U=-1+2*6-E) 

114 SK)=SCK-1) 

128 FOR I={ TO 2*K 


174 FOR J={ TN 12 

184 MCK,.D=MCK, J-D)+CMCF 
»J-D)-NK-1,1-133404%.-1 
} 

198 HEXT | 

208 IF ABSCHCK,K)-MCE-1. 
K-1)3€L THEN DISP M€K,K 
A BEEP À END 

e1A NEËT K 

230 DEF FNYCX) = SGRiX: 
Ca-1-1/LOGCX) 


*%* _* 


Cher Jean-Daniel, 


Je t'S£cris pour ouvrir, en quelque sorte, 


PPC-T Hoë 
JUILLET AQUT en 


la rubrique HF 75 


Et oui, je viens de faire cette folie ! 
(9 400 F). Je me suis plongé aussitôt dans le confortable 
Manuel (354 pages, index Compris...). Je ne vais pas me lan- 
cer dans la description du 75 qui a été très bien faite dans 
l'OI et l'OP, mais émettre quelques critiques qui s'avèreront 
peut-être constructives 
- Absence d'accès en LM directement pour l'instant, mais je 
compte sur tous les possesseurs de 75 qui ont envie de dé- 
monter le bloc d'accus pour volatiliser partiellement la 


MEV . 


-Peu d'accès en Programme dans le calendrier étendu . On 
aurait pu l'espérer, en regard du module time du 41 . En ef- 
fet, hormis TIME “ TIMES / DATE / DATE Ÿ qui sont les 4 fonc- 
tions donnant heure e’ düte du jour sous 2 fornes différentes 
il n'y a pas possibilité de calcul du nombre de jours entre 


2 dates, ni de chrono à lecture directe. 


7 Enfin quelques fonctions du basic de la série 80 ne sont 
Pas adressables indirectement : c'est-à-dire que l'on est 
obligé de spécifier la valeur numérique comme argurent . 
Exemple : 

DIM V (N) est rofusé même si l'on a défini au préalable la 
variable N, "Gtonnant non "? 

Dans un premier temps, j'ai imaginé créer la ligne de pro- 
gramme en stockant sur un fichier TEXT. une variable # 


contenant le libellé de la fonction, puis, après l'avoir 
transformée en Basic, le "MERGE" au programme principal : 


100 ASSIGN ff 1 TO "Brouillon", TEXT 

110 INPUT N 

120 À $= "DIM V (“ & STR SN) a&")" 

130 PRINT # 1, 160; a$ 

140 TRANSFORM "Brouillon" INTO BASIC 

145 EDIT "Brouillon" 

150 MERGE "BROUILLON" 

160 ! Place réservée à la ligne d'instruction 


170 ! Suite du programme 


Trop beau pour être vrai ? 

Vous avez raison, le manuel (p. 172) me l'avait bien dit: 
"La fusion d'un fichier d'un programme alloué désalloue ce 
dernier" !! 

Que faire ? 

Et bien, sur le même principe, on créée un 2° fichier qui 
commande les modifications du 1° vers le programme princi-— 
pal. De plus, pour une raison de commodité, le programme 
principal doit contenir tous les futurs fichiers temporai- 


res pour économiser les cartes magnétiques . 


Programme principal 


Génération d'un fichier contenant 



















s 


les instructions à fusionner 








| Génération d'un fichier contenant 


Programme 





le programme de commande de 








commande fusion 















comman-—- 





Appel par RUN du programme 
de’ 











——— > 
Emplacement réservé aux lignes 





provenant de Brouillon 











Suite du Progranne”"] 
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Bill, SJ Ce n'est toujours pus CLAIE, VuieL un Jisting 


exemple; quelques dernières précisions : l'instruction 
CALL (appel du programme) s'arrête sur une instruction 
MERGE; j'ai donc dû faire appel à RUN, avec préservation 


sur un 3° fichier temporaire des variables que j'avais pré- 


alablement entrées, comme N,pour V (N). 


"EXEMPLE" 

10 ASSIGN # 1 TO "DATA" 

20 ASSIGN # 2 TO "BROUIL", TEXT 

30 ASSIGN # 3 TO "COMMAND",TEXT 

40 INPUT N 

50 PRINT # 1,1%N 

60 A$ = "DIM V ("& STR $ (N) 8&")" 

70 PRINT # 2, 130; Aÿ 

80 Aÿ ="EDIT "EXEMPLE" @ MERGE "BROUIL" @ RUN "EXEM- 
PLE", 130" 

90 PRINT # 3; A$ 

100 TRANSFORM "BROUIL" INTO BASIC 

110 TRANSFORM "COMMAND" INTO BASIC 

120 RUN "COMMAND" 

130: À sosasssmeseseusesnmesseds sion té 

140 READ # 1, 13 N 


150 ! Suite du programme 


Voilà ! 
Je réclame votre indulgence, je n'ai la machine que depuis 
8 jours. J'espère avoir été assez clair. 
Merci d'avoir tenu la distance. 
Bravo pour le journal 
Synthétiquement vôtre, 
Eric ANGELINI T 210 
T 210 


14, Avenue Marianna 


0G000 NICE 


P.S. Je vends un VIDEO GENIE SYSTEM (achat : Août 1981), 
avec sortie son du lecteur cassette intégré, avec quelques 
programmes commerciaux de jeux, avec manuels et V1 pratique 


du TRS B0. Prix = 3 000 F avec Monitor (TV NB modifiée). 


*k * 


Janick Taïllandier m'a envoyé un petit programme permettant 
de faire du langage machine sur HP 75, et cela en transformant 


un fichier "Texte". Je n'ai pas de 75, donc mes explications 
sont peut-être sommaires, mais je pense qu'il ne faut pas 
laisser ce genre d'information ignorée, même si tout n'est 
pas au point. 

Janick utilise un LEX FILE du commerce. Il charge en 
fichier texte un programme assembleur (pour l'instant trouvé 
dans PPCJ-computer), range ce programme sur cassette puis 
lance le programme ci-joint qui transforme le programme texte 


d'imprimante est en bleu, 
c'est beaucoup trop 


en programme assembleur. Le ruban 
j'espère qu'il sera quand même lisible, 
compliqué pour être retapé à la machine! 


Je voudrais ajouter qu'il doit être possible de ressortir 


la vieille méthode de la "black box" (boite noire) utilisée 
par PPC pour truander les machines précédent la HP 41: il 
s'agit d'un simple potentiomèêtre bobiné de quelques dizaines 


d'ohms intercallé à l'aide d'isolant papier et de conducteurs 
en feuilles d'aluminium ménager entre un pole de l'alimentation 
et le pole correspondant de la machine. Une rotation du potentio- 
mêtre fait varier la tension d'alimentation de la machine 
et permet d'arriver à la tension de décrochage du microprocesseur 
avec des résultats inattendus.... 


an SENDIS Af,'LADE En 


.CHES CET CHRSEE" 
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REACTION - REACTION - SUITE 


total). Donc : vive Duriez ! 

Mon revendeur "local" m'annonce une baisse de 60 % du système 
HP-IL (T'HP-IL, le lecteur de K7, l'interface vidéo, la nouvelle- 
imprimante etc...) pour le début des vacances. Voilà qui met 
en particulier l'interface vidéo à portée de pas mal de monde. 
Je me suis mis à la "Users' Library" car étant étudiant en 


électronique, certains programmes sont très intéressants. 
Les derniers trucs que j'ai sont : 

Programmer 's Reference Guide 

Catalog of Contributed Programs (contient le dernier 


key note, le n° 7). Si par le plus grands des hasards tu ne 
les as pas, je peux te les prêter je te les envois, tu me 
les fais parvenir quand tu peux. D'autre part, j'ai cru compren- 
dre que tu avais de la famille ici à Montpellier : si à l'occa- 
sion tu passes et que tu as du temps de libre, contacte-moi 
j'aimerai discuter et voir "en chair et en os" "mon président". 
Demande Jean-Philippe au téléphone. 

Je reviens au programme KA la différence de 
face à une erreur de programmation doit venir du fait que 
dans le nouveau programme, la pile contient déjà un nombre 
important avant l'introduction des données et il faut que 
ce nombre se retrouve en T après l'introduction des données 
sinon ça foire. Dans l'ancien programme, c'est le registre 


réaction 


L qui contient un nombre important donc même si on ne rentre 
que | ou 2 données, ce "nombre important" n'est pas perdu. 
Malheureusement, je suis incapable d'effectuer une synthèse 
des deux programmes. 
Pour finir, je te commande : 

2xCT 2 cartes des codes HP 41 C en couleur 25F X 2. 

1XC5 Autocollants toutes fonctions HP 41 et periph. 


Fais donc parvenir au trésorier 
55F ci-joint. 

Dernier mot comment avoir d'anciens 
(USA), comment s'y inscrire ? 

En espérant que je ne t'ai pas trop saoulé de questions 
et de bla-bla... 

T - 284 te salut bien. 

P.S. “n'est pas président qui veut" 

TXC5S +2 X CI à 


le chèque banquaire de 


numéros de PPC 


J. PH. IMBACH 

1108, rue de Las Sorbes 
34000 Montpellier 

Tél : (16 67) 63 00 43 


Cette lettre m'a paru valloir la publication. 





Quand à la mise en page du journal, les réflexions que 
tu fais sont intéressantes. En fait je pense que tu emploie 
la bonne méthode: souligner en couleur les rubriques selon 
le classement qui te plait. 

Pour le club je suis amené à m'occuper de plusieurs choses, 
comme tu peux Île voir en dernière page. En fait "l'épicerie" 
me prend en moyenne une heure par jour. C'est à la fois peu 
et beaucoup, car c'est autant de temps que je ne peux consacrer 
à la mise en page du journal. 

Cependant, je ne tiens pas pour l'instant à être déchargé 
de cet aspect du travail car, dans la structure actuelle du 
club, c'est le seul moyen pour moi de rester en contact avec 
les adhérents. 

Une entreprise habituelle fonctionne de façon centralisée, 
tout le courrier arrive dans le même local où les administrateurs 
peuvent le consulter avant d'y répondre. Rien de tel pour 
nous. Nous n'avons pas de local et je ne  souhaîte pas que 
nous en ayons! Pour des raisons familiales, je tiens essentielle- 
ment à avoir des activités qui me permette de rester chez 


moi. De toute façon, un Jlocal est absolument au dessus de 
nos moyens. 
Du coup l'administration est dispersée. Ce n'est pas 


grave pour le débat ou la prise de décisions, car le téléphone 
fonctionne bien! Mias je n'ai à peu prés aucun écho de ce 
que vous écrivez au trésorier, au responsable polycop, etc... 

C'est normal. Mais les réflexions dont vous . émaillez 
vos lettres sont pour moi Île meilleur des sondages sur lÎa 
vivacité du club. Si j'abandonnais toute activité liée au 
courrier, je perdrai donc une source précieuse de renseignements. 

De plus, meilleure mise en pase suppose parcellisation 
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du journal en rubriques de quelques lignes. Comme tout cela 
est alimenté par vos lettres, cela supposerait que vous fassiez 
autant de feuilles que de réflexions, et manifestement ce 
n'est pas dans vos habitudes, ou que je retape ces réflexions 
aprés ventilation, autant tout réécrire. 

Certains regrettent les mentions sur les commandes dans 
les lettres publiées. Elles ne sont sans doute pas indispensables 
mais généralement soigneusement mélangées au reste, et d'ailleurs 
cela donne une idée de la vie du club, non? 

La “budine" est un anneau prévu pour recevoir un cadenas 
pour éviter la fauche dans les bureaux, efficace? 

J'espêre que vous avez raison quand à la baisse dans 
les magasins, mais 60% me paraît bien optimiste! 

Remarque: ta lettre est un exemple des commandes "imbriquées 
dans le texte!!! 


amicalement 
J-D Dodin (T1) 


NS F "2 
e< 4 
Lausanne, le 7 mai 1983 


Philippe komascano ( T69 ) 


Gsrand-Vennes 39 I0IC Lausanne 





vher Jean-Daniel, 





Voici quelques nouvelles du Club 
r.r.C. en Suisse. Aprés cing mois de recherches, 
nous avons enfin trouvé un local de réunions à 
sausanne. 5i l'adresse vous intéresse, la voici : 

" Le Cazard ", 15 Kue Fré-du-Marché. Nous nous y 
réunissons en général les premiers lundis de chaque 
mois. Nous essayons de présenter lors de ces ren- 
contres le plus d'informations et de matériels. 
“uelques membres aÿant un 75C, nous pensons bientôt 


l'inclure dans les articles de notre journal. 


Hewlett-Packard Genève m'a aimablement prêté un 
plotter 74704 pour deux semaines. Je pense que 
c'est üun appareil fantastique pour i'“dition de 
codes-barres, mais il dépasse les possibilités de 
la 41 pour le tracage de courbes. Lorsque l'on pen- 
se avec quelle facilité le Basic vous permet d' M 
parvenir, je ne peux que dire que la 41 n'est pas 

à la hauteur de ce plotter ; heureusement qu'il 


est disponible en HF-IB... 


yans le dernier numéro de votre journal, un de vos 
membres, monsieur Felanne de Faris (T191) signale 
ies difricultés qu'il y a en France pour la comman- 
ie des PEC nOk aux U.S.A. Four ce qui est de la 
Juisse, je prends moi-même les commandes pour le 
-iub; j'obtiens les hOM &e kichard Nelson au prix 

de environ 135 francs suisses ( = 4COFF ? )}. Comme 
il n'y a aucune restriction de Change en Suisse, 
voici ce que je vous propose !: je pourrai me charger 
de prendre les commandes de vos adhérents au prix 
ci-Cessus et de leur taire parvenir une KCM: je 
vrécise que notre Club n'a aucun but lucratif et 

ue nous ne touchons rien sur le prix des kUh; 

Je pense que de cette manière tous les adhérents 

de r.P.C. de Suisse ou de France pourront disposer 


de ce merveilleux module qu'est le PIC KHOM. 


Côté pratique, voici ce que je vous suggère :! 
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rubiiez cette lettre, soit d2ns votre prochain 


30 
& 


gournai, soit, pourauoi vas, scus in for 


F3 


une 
de vos Circulaires mensuclies. 

Je denande à toutes les Lersonres intéressées de 
me aire parvenir la somme de 140 francs suisses, 
qui incluerait les frais de ports pour la France. 
Je crois que les £urocnèques sont ie meilleure 


moyen pour celà. Voici à nouveau mon adresse ! 


Fhilippe komascano Grand-Vennes 39 


ICI0 Lausanne Suisse. Joignez à votre commande 
une envelloppe portant vos nom et adresse, ainsi 
que l'équivalent de 2frs 40 FF, que je puisse 
vous envoyer un reçu, comme garantie de réception. 
Lors de la dernière commande du Club, pour 15 
KOM, tout à été réglé en 2,5 mois, les ROM étant 
arrivées en Suisse 3 semaines après commande, et 
les manuels 1 mois après, par bateau. Je ne peux 
rien garantir comme délai de livraison, car les 
postes américaines sont trop souvent atteintes 
de paresse... Afin d'éviter une commande trop 
importante si beaucoup de monde est intéressé, 
nous pourrions envisager de faire les commandes 
par groupes de 20 KOM, au maximum une fois par 
mois. Ve cette manière, je ne risque pas de me 


retrouver avec 50 demandes à la fois ! 


Voilà, j'espère, Jean-Daniel, que vous n'acceuil- 
lerez pas mal ma proposition, car encore une fois 
il ne s'agit pas de faire du fric, mais de donner 


accès au plus de monde possible à cette ROM. 


Je pense que pour une fois je vous ai envoyé une 
lettre au format correct pour être publiée. Je 


vous envoie mes meilleures salutations et amitiés. 


Fhilippe komascano 


MONNN NN 6 6 ee 


REMARQUE 


Vu le volume de la matière dans ce journal, un bon nombre 
de textes intéressants sont "restés sur le carreau", y compris 
des compte-rendus de la réunion de bretagne, des lettres, 
la traduction de l'exellent article de Richard Nelson sur 
l'électricité statique et plein de programmes. Ce sera pour 
le prochain numéro. Celui-ci vous parviendra début Septembre, 
je ne veux pas faire d'envoi pendant le mois d'Aout, il y 
a trop d'absents à l'adresse indiquée. 


NOTE SUR LE FORMAT 


Pour être publiables, vos textes doivent être tapés à la machine 
(à la rigueur calligraphiés sur qaudrillage 5x5) en 13,5 cm 
de large maxi, simple interligne, recto seul, et bien noirs. 
Je ne suis pas sûr de ce que vont donner dans ce numéro des 
textes tapés en ocre ou en gris (j'allais dire en blanc!) 

Tant que la liste des adhérents n'est pas publiée, il 
est souhaïtable que vous indiquiez vos nom et adresse en début 
ou en fin de texte. 

Envoyez obligatoirement les programmes sur carte magnét i que 
ou cassette (retournées à la demande, toujours pour les casset- 
tes), avec une liste du programme au cas ou le support magnétique 
serait déffectueux. 
Ne faites pas de mise en page, vous ne pouvez pas savoir comment 
est ma page. 

on Merci 


+ XX 
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L'ORGANISATION DE PPC TOULOUSE 


Cette page sera publiée dans chaque numéro de PPC-T. Seuls 
les produits répertoriés sont disponibles. PPC-T étant une 
association sans but lucratif elle ne fait pas de bénéfice 
et ses produits et services sont réservés aux adhérents. 


Association PPC-T 


Association à but non lucratif (loi de 1901), 
des adhérents dans toute la France et à l'étranger. 
La cotisation, abonnement au journal inclu, est de: 
France et Europe 100 F (français) 

DOM-TOM et reste du monde par avion 150 F 

Modes de règlement: Chèques et mandats postaux à l'ordre de 
PPC-T (Eurochèques acceptés - mandats postaux uniquement pour 
les DOM-TOM). 


PPC-T accepte 


L'inscription prend effet au premier jour du bimestre qui 
précède la réception du bulletin d'adhésion (ler Janvier, 
ler Mars....). 
Responsables de PPC-T 

Président: Jean-Daniel Dodin 77 rue du Cagire 31100 Toulouse 
MnouveTTe adhésions, coopérative, eproms, numéros du journal 
de l'année en cours). ) 

Trésorier Jean-François Sibille Résidence du Pays d'OC rue 


des genets 31500 Toulouse (librairie, renouvellement d'adhésions, 
fichier, problèmes financiers). 

Secrétaire : Jean-Luc Basso 4 rue Jacques Darré 31300 Toulouse 
(coordination des chapitres, organisation des réunions). 


Progr ammathèque Damien Debril 38 rue du 8 Mai 1945 59190 
azebrouk. 

Photocopies, album 82 du journal Gilles Barret 92 av de 
ure ouTouse 


Coordinateurs régionaux : 
er er pe A 


Bretagne : Frank Lebastard 10 rue de la Jalousie 35600 Redon 


Des coordinateurs sont recherchés pour toutes les régions 
(démonstrations, collections de journaux, réunions à 
organiser...) 
Disponible à Toulouse 
Chez le trésorier uniquement: 
Librairie : 
L1: William Kolb, Curve Fitting 2°édition 120 F 
L2: John Dearing, Calculator tips and routines 130 F 
L4: J-D Dodin, Au fond de la HP 41C 80 F 
L5:Keith Jarett, Synthetic programming made easy 130 F 
Chez le président uniquement: 
Coopérative : 
C1: Carte des codes HP-41 couleur 25 F 
C3: Overlay perforés en bristol, les 10 30 F 
C5: autocollants toutes fonctions 41C et périphériques 65F 
C7: cartes magnétiques HP avec classeur, les 80 250 F 
C8: classeur de cartes magnétiques de poche 20 F 
Anciens journaux: 
N°3, 4 ou 5, chacun 15F 
N°6 20 F 
Eproms : 
IT s'agit d'un jeu d'eproms (2716+2732) pret à fonctionner 
sur n'importe quel lecteur d'eproms comme le BE-01-4K, ou 


le MLDL. Le prix unique de 200 F comprend la fourniture des 
eproms, le port en recommandé et les mises à jour éventuelles 
(par retour des eproms à Toulouse) pendant un an. Pour ceux 
d'entre vous qui ont un lecteur acceptant 8K, des combinaisons 


peuvent être réalisées (ex: TRID + monitor). Le jeu de trois 
eproms (2x2732 + 1 2716) est alors facturé 300 F. Si vous 
fournissez vous même Îles eproms, la copie est facturée 70 
F. Règlements à l'ordre de J-D Dodin. 

Sont disponibles: tons 

HP service module IC (non compatible avec d'autres eproms, 
fonctionnement décrit dans P11) 

Copie du module X-fonctions | 
PPC ROM. 2C (microcode) dans sa forme originale (fonctions 


incluses dans Toulrom) 

HP-IL Monitor: version précoce du HP-IL Dev. Module) 

Toulrom, dernière version courante. : 
Possibilité de copier n'importe quelle eprom fournie par vous. 


Cassettes : 


Pour ceux qui le souhaiteraient, je peux vous copier n'importe 
quel jeu d'eproms sur cassette. Comptez 20 F + 20 F par jeu 


d 3 


eprom. références ci-dessus uniquement. Pour usage avec 


le MLDL. 
Fournissez une cassette déja initialisée (NEWM 70 par exemple). 


Uniquement chez Gilles Barret: 
— 1" "27 711 '6es barre 


Photocopies : 


Pl: Data base, extraits de la notice 25 F 
P2: PPC East cost conference (avril 82) 50 F 
P7: Microcode PPC:tous les ROMS HP jusqu'en 82 120 F 
P5: Microcode 3, restent 2 exemplaires (chez Dodin) 40 F 
P8: Microcode HP 220 F 
P9: documentation sur HP-IL Monitor 10 F 
P10: trésors cachés de la HP-41C (1'01) 15F 
P11: manuel technique HP-41C 60 F 
PI2: manuel du convertisseur HP-IL 25 F 
P13: PPC Southwest conference (janvier 83) 35 F 
P14: HP Journal janv 83 en anglais (HP-IL) 20 F 
P15: dossier Hard: tout ce qui est paru sur le 

hard jusqu'en 82 45 F 
P16: Album PPC-T 1982 (1ère année du journal) 50 F 


REMARQUES IMPORTANTES 


Passer commande à un autre que le responsable nous fait perdre 


un 
à 


temps précieux et retarde votre livraison de une semaine 
15 jours. 


Tous les prix sont franco de port. 
Les anciens numéros de PPCJ (USA) sont maintenant disponibles, 


même pour les non adhérents au club américain (mais 
les commander là-bas). Liste avec 
Nous pourrions sans doute agir 


er 
de 


seraient pas moins en anglais, mais plus faciles 
Mais compte tenu du (trés gros) travail que cela 
nous ne pourrions 


et 


à 300 pages au format PPC-T). 


il faut 
contenu et prix sur demande. 
de la façon suivante: faire 
France les photocopies, payer au club américain un droit 
reproduction et diffuser nous même ces journaux. ils n'en 
à obtenir. 
représente, 
faire la vente que par années complètes 
pour un montant entre 200 et 250 F chaque année (de 150 
Ecrivez-moi vite pour me donner 


votre avis (I1 y a au total 10 ans de PPC, 4ans pour la 41C). 


85.45.1987 81:23:25 NO 1 P 13 -1 C-LFA 
NO 1 P 13 -{ C-DH 
HO 2 P3 -3 C-MI 
PROGRAMMES DISPONIBLES HO ©? P4 -3 C-RE 
CHEZ T33 NO 2 PS5 -2 C-BASES 
DAMIEN DEBRIL NO 2 PS -1 C-PAGE 
38 RUE DU & MAI 1945 NO 3 P 14 -2 C-CALAN 
59194 HAZEBROUCK NO 3 P 15 -2 C-NATT 
FRAHCE NO 3 P 17 -3 C-BAIRST 
NO 3 P 17 -3 C-FERRAIL 
PQUR LES CARTES PREVOIR NO 3 P 18 -2 C-TOB-MUL 
ENVELOPPE RETOUR AFFR. NO 3 P 18 -{ C-MGH 
A 1,68F OU 2,68F. NO 3 P {9 -2 C-HIDDEN 
POUR LES CASSETTES NO 3 P 19 -5 C-LEM 
METTRE 2,38F OÙ 3,28F HO 3 P 21 -6 C-DISBIN 
PREVOIR UN EMBALLAGE NO 3 P 23 -{ C-LOH 
SOLIDE CAR IL Ÿ À DEJA NO 4 P 3 -2 C-LEFT 
EU DES DEGATS DURANT LE NO 4 P 4 -{1 C-HIDDEN2 
TRANSPORT PAR LA POSTE NO 4 P 4 -4 C-HIND 
J AI MIS LES NOMS SOUS NO 4 PS5 -1 C-DPC 
LESQUELS LES PROGRAMMES NO 4 P 6 -i C-MA 
SONT STOCKES. NO 4 P 7 -{ C-CREAT 
VOUS POUVEZ PREPARER LES NO 4 P7 -1 C-PD 
CARTES EH Y INSCRIVANT NO 4 P 25 -2 C-HDUMP 
LES NONS DES PROGRAMMES. NO 4 P 26 -3 C-SPEC 
NO 4 P 27 -3 C-FERME C 
VIN? P 3 -{ C-CREA ND 4 PA -ji C-A55 
VIN? P 3 -{ C-LISTE NO 4 PA -8 C-RC 
VIH2 PA -{ C-El NO 4 P@ -{ C-RCKEYS 
VINZ PF 4 -1 C-DF NO 4 PA -{ C-RCDATA 
VIN3 PS -4 C-CIF NO 4 PA -8 C-R 
VIN4 P 18 -2 C-INTER HO 4 PA -{ C-D-H 
YIiH4 P 11 -2 C-TAE NO 5 P3 -5 C-CAISSE 
VIN4 P 11 -2 C-651 NOS P3 -3 C-CA 
VIN4 P 9 -1 C-T NO 5 P4 -2 C-BLJACK 
NO 1 P 16 -1 C-QUOT NO 5 PS5 -1C-P/ 
NO 1 PS5 -1 C-FACTO NS F5 -1 C-IGk 
NO ! PS5 -{ C-ALFA NO 5 P 6 -2 C-TRANS 
HO Ÿ P6 -1 C-ALFAZ HG 5 P6 -i C-0M 
NO Ï P6 -1 C-ALFAZ NO 5 P 9 -2 C-EDTEXTE 
NO 1 P7 -{ C-LB NO 5 P 18 -{ C-FACTO? 
NO 1 P7 -{ C-DN NO 5 P 14 -3 C-MM 
NO 1 P8 -2 C-PILOTE NO 5 P 14 -{ C-KAT71 
NO 1 P 13 -4 C-CFà 
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